cloudsmith-api 2.0.13 → 2.0.14

data/vendor/bundle/ruby/2.6.0/gems/ffi-1.16.3/ext/ffi_c/libffi/src/x86/ffiw64.c

@@ -1,361 +0,0 @@
-/* -----------------------------------------------------------------------
-   ffiw64.c - Copyright (c) 2018 Anthony Green
-              Copyright (c) 2014 Red Hat, Inc.
-
-   x86 win64 Foreign Function Interface
-
-   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 AUTHORS OR COPYRIGHT
-   HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
-   WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
-   OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
-   DEALINGS IN THE SOFTWARE.
-   ----------------------------------------------------------------------- */
-
-#if defined(__x86_64__) || defined(_M_AMD64)
-#include <ffi.h>
-#include <ffi_common.h>
-#include <stdlib.h>
-#include <stdint.h>
-#include <tramp.h>
-
-#ifdef X86_WIN64
-#define EFI64(name) name
-#else
-#define EFI64(name) FFI_HIDDEN name##_efi64
-#endif
-
-struct win64_call_frame
-{
-  UINT64 rbp;		/* 0 */
-  UINT64 retaddr;	/* 8 */
-  UINT64 fn;		/* 16 */
-  UINT64 flags;		/* 24 */
-  UINT64 rvalue;	/* 32 */
-};
-
-extern void ffi_call_win64 (void *stack, struct win64_call_frame *,
-			    void *closure) FFI_HIDDEN;
-
-ffi_status FFI_HIDDEN
-EFI64(ffi_prep_cif_machdep)(ffi_cif *cif)
-{
-  int flags, n;
-
-  switch (cif->abi)
-    {
-    case FFI_WIN64:
-    case FFI_GNUW64:
-      break;
-    default:
-      return FFI_BAD_ABI;
-    }
-
-  flags = cif->rtype->type;
-  switch (flags)
-    {
-    default:
-      break;
-    case FFI_TYPE_LONGDOUBLE:
-      /* GCC returns long double values by reference, like a struct */
-      if (cif->abi == FFI_GNUW64)
-	flags = FFI_TYPE_STRUCT;
-      break;
-    case FFI_TYPE_COMPLEX:
-      flags = FFI_TYPE_STRUCT;
-      /* FALLTHRU */
-    case FFI_TYPE_STRUCT:
-      switch (cif->rtype->size)
-	{
-	case 8:
-	  flags = FFI_TYPE_UINT64;
-	  break;
-	case 4:
-	  flags = FFI_TYPE_SMALL_STRUCT_4B;
-	  break;
-	case 2:
-	  flags = FFI_TYPE_SMALL_STRUCT_2B;
-	  break;
-	case 1:
-	  flags = FFI_TYPE_SMALL_STRUCT_1B;
-	  break;
-	}
-      break;
-    }
-  cif->flags = flags;
-
-  /* Each argument either fits in a register, an 8 byte slot, or is
-     passed by reference with the pointer in the 8 byte slot.  */
-  n = cif->nargs;
-  n += (flags == FFI_TYPE_STRUCT);
-  if (n < 4)
-    n = 4;
-  cif->bytes = n * 8;
-
-  return FFI_OK;
-}
-
-/* We perform some black magic here to use some of the parent's stack frame in
- * ffi_call_win64() that breaks with the MSVC compiler with the /RTCs or /GZ
- * flags.  Disable the 'Stack frame run time error checking' for this function
- * so we don't hit weird exceptions in debug builds. */
-#if defined(_MSC_VER)
-#pragma runtime_checks("s", off)
-#endif
-static void
-ffi_call_int (ffi_cif *cif, void (*fn)(void), void *rvalue,
-	      void **avalue, void *closure)
-{
-  int i, j, n, flags;
-  UINT64 *stack;
-  size_t rsize;
-  struct win64_call_frame *frame;
-  ffi_type **arg_types = cif->arg_types;
-  int nargs = cif->nargs;
-
-  FFI_ASSERT(cif->abi == FFI_GNUW64 || cif->abi == FFI_WIN64);
-
-  /* If we have any large structure arguments, make a copy so we are passing
-     by value.  */
-  for (i = 0; i < nargs; i++)
-    {
-      ffi_type *at = arg_types[i];
-      int size = at->size;
-      if (at->type == FFI_TYPE_STRUCT && size > 8)
-        {
-          char *argcopy = alloca (size);
-          memcpy (argcopy, avalue[i], size);
-          avalue[i] = argcopy;
-        }
-    }
-
-  flags = cif->flags;
-  rsize = 0;
-
-  /* If we have no return value for a structure, we need to create one.
-     Otherwise we can ignore the return type entirely.  */
-  if (rvalue == NULL)
-    {
-      if (flags == FFI_TYPE_STRUCT)
-	rsize = cif->rtype->size;
-      else
-	flags = FFI_TYPE_VOID;
-    }
-
-  stack = alloca(cif->bytes + sizeof(struct win64_call_frame) + rsize);
-  frame = (struct win64_call_frame *)((char *)stack + cif->bytes);
-  if (rsize)
-    rvalue = frame + 1;
-
-  frame->fn = (uintptr_t)fn;
-  frame->flags = flags;
-  frame->rvalue = (uintptr_t)rvalue;
-
-  j = 0;
-  if (flags == FFI_TYPE_STRUCT)
-    {
-      stack[0] = (uintptr_t)rvalue;
-      j = 1;
-    }
-
-  for (i = 0, n = cif->nargs; i < n; ++i, ++j)
-    {
-      switch (cif->arg_types[i]->size)
-	{
-	case 8:
-	  stack[j] = *(UINT64 *)avalue[i];
-	  break;
-	case 4:
-	  stack[j] = *(UINT32 *)avalue[i];
-	  break;
-	case 2:
-	  stack[j] = *(UINT16 *)avalue[i];
-	  break;
-	case 1:
-	  stack[j] = *(UINT8 *)avalue[i];
-	  break;
-	default:
-	  stack[j] = (uintptr_t)avalue[i];
-	  break;
-	}
-    }
-
-  ffi_call_win64 (stack, frame, closure);
-}
-#if defined(_MSC_VER)
-#pragma runtime_checks("s", restore)
-#endif
-
-void
-EFI64(ffi_call)(ffi_cif *cif, void (*fn)(void), void *rvalue, void **avalue)
-{
-  ffi_call_int (cif, fn, rvalue, avalue, NULL);
-}
-
-void
-EFI64(ffi_call_go)(ffi_cif *cif, void (*fn)(void), void *rvalue,
-	     void **avalue, void *closure)
-{
-  ffi_call_int (cif, fn, rvalue, avalue, closure);
-}
-
-
-extern void ffi_closure_win64(void) FFI_HIDDEN;
-#if defined(FFI_EXEC_STATIC_TRAMP)
-extern void ffi_closure_win64_alt(void) FFI_HIDDEN;
-#endif
-
-#ifdef FFI_GO_CLOSURES
-extern void ffi_go_closure_win64(void) FFI_HIDDEN;
-#endif
-
-ffi_status
-EFI64(ffi_prep_closure_loc)(ffi_closure* closure,
-		      ffi_cif* cif,
-		      void (*fun)(ffi_cif*, void*, void**, void*),
-		      void *user_data,
-		      void *codeloc)
-{
-  static const unsigned char trampoline[FFI_TRAMPOLINE_SIZE - 8] = {
-    /* endbr64 */
-    0xf3, 0x0f, 0x1e, 0xfa,
-    /* leaq  -0xb(%rip),%r10   # 0x0  */
-    0x4c, 0x8d, 0x15, 0xf5, 0xff, 0xff, 0xff,
-    /* jmpq  *0x7(%rip)        # 0x18 */
-    0xff, 0x25, 0x07, 0x00, 0x00, 0x00,
-    /* nopl  0(%rax) */
-    0x0f, 0x1f, 0x80, 0x00, 0x00, 0x00, 0x00
-  };
-  char *tramp = closure->tramp;
-
-  switch (cif->abi)
-    {
-    case FFI_WIN64:
-    case FFI_GNUW64:
-      break;
-    default:
-      return FFI_BAD_ABI;
-    }
-
-#if defined(FFI_EXEC_STATIC_TRAMP)
-  if (ffi_tramp_is_present(closure))
-    {
-      /* Initialize the static trampoline's parameters. */
-      ffi_tramp_set_parms (closure->ftramp, ffi_closure_win64_alt, closure);
-      goto out;
-    }
-#endif
-
-  /* Initialize the dynamic trampoline. */
-  memcpy (tramp, trampoline, sizeof(trampoline));
-  *(UINT64 *)(tramp + sizeof (trampoline)) = (uintptr_t)ffi_closure_win64;
-
-#if defined(FFI_EXEC_STATIC_TRAMP)
-out:
-#endif
-  closure->cif = cif;
-  closure->fun = fun;
-  closure->user_data = user_data;
-
-  return FFI_OK;
-}
-
-#ifdef FFI_GO_CLOSURES
-ffi_status
-EFI64(ffi_prep_go_closure)(ffi_go_closure* closure, ffi_cif* cif,
-		     void (*fun)(ffi_cif*, void*, void**, void*))
-{
-  switch (cif->abi)
-    {
-    case FFI_WIN64:
-    case FFI_GNUW64:
-      break;
-    default:
-      return FFI_BAD_ABI;
-    }
-
-  closure->tramp = ffi_go_closure_win64;
-  closure->cif = cif;
-  closure->fun = fun;
-
-  return FFI_OK;
-}
-#endif
-
-struct win64_closure_frame
-{
-  UINT64 rvalue[2];
-  UINT64 fargs[4];
-  UINT64 retaddr;
-  UINT64 args[];
-};
-
-/* Force the inner function to use the MS ABI.  When compiling on win64
-   this is a nop.  When compiling on unix, this simplifies the assembly,
-   and places the burden of saving the extra call-saved registers on
-   the compiler.  */
-int FFI_HIDDEN __attribute__((ms_abi))
-ffi_closure_win64_inner(ffi_cif *cif,
-			void (*fun)(ffi_cif*, void*, void**, void*),
-			void *user_data,
-			struct win64_closure_frame *frame)
-{
-  void **avalue;
-  void *rvalue;
-  int i, n, nreg, flags;
-
-  avalue = alloca(cif->nargs * sizeof(void *));
-  rvalue = frame->rvalue;
-  nreg = 0;
-
-  /* When returning a structure, the address is in the first argument.
-     We must also be prepared to return the same address in eax, so
-     install that address in the frame and pretend we return a pointer.  */
-  flags = cif->flags;
-  if (flags == FFI_TYPE_STRUCT)
-    {
-      rvalue = (void *)(uintptr_t)frame->args[0];
-      frame->rvalue[0] = frame->args[0];
-      nreg = 1;
-    }
-
-  for (i = 0, n = cif->nargs; i < n; ++i, ++nreg)
-    {
-      size_t size = cif->arg_types[i]->size;
-      size_t type = cif->arg_types[i]->type;
-      void *a;
-
-      if (type == FFI_TYPE_DOUBLE || type == FFI_TYPE_FLOAT)
-	{
-	  if (nreg < 4)
-	    a = &frame->fargs[nreg];
-	  else
-	    a = &frame->args[nreg];
-	}
-      else if (size == 1 || size == 2 || size == 4 || size == 8)
-	a = &frame->args[nreg];
-      else
-	a = (void *)(uintptr_t)frame->args[nreg];
-
-      avalue[i] = a;
-    }
-
-  /* Invoke the closure.  */
-  fun (cif, rvalue, avalue, user_data);
-  return flags;
-}
-
-#endif /* __x86_64__ */

data/vendor/bundle/ruby/2.6.0/gems/ffi-1.16.3/ext/ffi_c/libffi/testsuite/Makefile.am

@@ -1,135 +0,0 @@
-## Process this file with automake to produce Makefile.in.
-
-AUTOMAKE_OPTIONS = foreign dejagnu
-
-EXTRA_DEJAGNU_SITE_CONFIG=../local.exp
-
-CLEANFILES = *.exe core* *.log *.sum
-
-EXTRA_DIST = config/default.exp lib/libffi.exp lib/target-libpath.exp	\
-lib/wrapper.exp libffi.bhaible/Makefile libffi.bhaible/README		\
-libffi.bhaible/alignof.h libffi.bhaible/bhaible.exp			\
-libffi.bhaible/test-call.c libffi.bhaible/test-callback.c		\
-libffi.bhaible/testcases.c libffi.call/align_mixed.c			\
-libffi.call/align_stdcall.c libffi.call/call.exp			\
-libffi.call/err_bad_typedef.c libffi.call/ffitest.h			\
-libffi.call/float.c libffi.call/float1.c libffi.call/float2.c		\
-libffi.call/float3.c libffi.call/float4.c libffi.call/float_va.c	\
-libffi.call/many.c libffi.call/many2.c libffi.call/many_double.c	\
-libffi.call/many_mixed.c libffi.call/negint.c libffi.call/offsets.c	\
-libffi.call/pr1172638.c libffi.call/promotion.c				\
-libffi.call/pyobjc_tc.c libffi.call/return_dbl.c			\
-libffi.call/return_dbl1.c libffi.call/return_dbl2.c			\
-libffi.call/return_fl.c libffi.call/return_fl1.c                        \
-libffi.call/return_fl2.c libffi.call/return_fl3.c                       \
-libffi.call/return_ldl.c libffi.call/return_ll.c                        \
-libffi.call/return_ll1.c libffi.call/return_sc.c                        \
-libffi.call/return_sl.c libffi.call/return_uc.c                         \
-libffi.call/return_ul.c libffi.call/struct1.c libffi.call/struct10.c    \
-libffi.call/struct2.c libffi.call/struct3.c libffi.call/struct4.c       \
-libffi.call/struct5.c libffi.call/struct6.c libffi.call/struct7.c       \
-libffi.call/struct8.c libffi.call/struct9.c                             \
-libffi.call/uninitialized.c libffi.call/va_1.c libffi.call/va_2.c       \
-libffi.call/va_3.c libffi.call/va_struct1.c libffi.call/va_struct2.c    \
-libffi.call/va_struct3.c libffi.call/struct_by_value_big.c              \
-libffi.call/struct_return_8H.c libffi.call/struct_return_2H.c           \
-libffi.call/struct_by_value_2.c libffi.call/struct_by_value_3.c         \
-libffi.call/struct_by_value_4.c libffi.call/struct_by_value_small.c     \
-libffi.call/strlen2.c libffi.call/strlen3.c libffi.call/strlen4.c       \
-libffi.call/strlen.c libffi.call/va_3.c                                 \
-libffi.call/struct_by_value_2.c libffi.call/struct_by_value_3.c         \
-libffi.call/struct_by_value_4.c libffi.closures/closure.exp             \
-libffi.call/struct_by_value_3f.c libffi.call/struct_by_value_4f.c       \
-libffi.call/s55.c libffi.call/bpo-38748.c                               \
-libffi.closures/closure_fn0.c libffi.closures/closure_fn1.c             \
-libffi.closures/closure_fn2.c libffi.closures/closure_fn3.c             \
-libffi.closures/closure_fn4.c libffi.closures/closure_fn5.c             \
-libffi.closures/closure_fn6.c libffi.closures/closure_loc_fn0.c         \
-libffi.closures/closure_simple.c libffi.closures/cls_12byte.c           \
-libffi.closures/cls_16byte.c libffi.closures/cls_18byte.c               \
-libffi.closures/cls_19byte.c libffi.closures/cls_1_1byte.c              \
-libffi.closures/cls_20byte.c libffi.closures/cls_20byte1.c              \
-libffi.closures/cls_24byte.c libffi.closures/cls_2byte.c                \
-libffi.closures/cls_3_1byte.c libffi.closures/cls_3byte1.c              \
-libffi.closures/cls_3byte2.c libffi.closures/cls_3float.c               \
-libffi.closures/cls_4_1byte.c libffi.closures/cls_4byte.c               \
-libffi.closures/cls_5_1_byte.c libffi.closures/cls_5byte.c              \
-libffi.closures/cls_64byte.c libffi.closures/cls_6_1_byte.c             \
-libffi.closures/cls_6byte.c libffi.closures/cls_7_1_byte.c              \
-libffi.closures/cls_7byte.c libffi.closures/cls_8byte.c                 \
-libffi.closures/cls_9byte1.c libffi.closures/cls_9byte2.c               \
-libffi.closures/cls_align_double.c libffi.closures/cls_align_float.c    \
-libffi.closures/cls_align_longdouble.c                                  \
-libffi.closures/cls_align_pointer.c                                     \
-libffi.closures/cls_align_sint16.c libffi.closures/cls_align_sint32.c   \
-libffi.closures/cls_align_sint64.c libffi.closures/cls_align_uint16.c   \
-libffi.closures/cls_align_uint32.c libffi.closures/cls_align_uint64.c   \
-libffi.closures/cls_dbls_struct.c libffi.closures/cls_double.c          \
-libffi.closures/cls_double_va.c libffi.closures/cls_float.c             \
-libffi.closures/cls_longdouble_va.c                                     \
-libffi.closures/cls_many_mixed_args.c                                   \
-libffi.closures/cls_many_mixed_float_double.c                           \
-libffi.closures/cls_multi_schar.c libffi.closures/cls_multi_sshort.c    \
-libffi.closures/cls_multi_sshortchar.c                                  \
-libffi.closures/cls_multi_uchar.c libffi.closures/cls_multi_ushort.c    \
-libffi.closures/cls_multi_ushortchar.c libffi.closures/cls_pointer.c    \
-libffi.closures/cls_pointer_stack.c libffi.closures/cls_schar.c         \
-libffi.closures/cls_sint.c libffi.closures/cls_sshort.c                 \
-libffi.closures/cls_struct_va1.c libffi.closures/cls_uchar.c            \
-libffi.closures/cls_uint.c libffi.closures/cls_uint_va.c                \
-libffi.closures/cls_ulong_va.c libffi.closures/cls_ulonglong.c          \
-libffi.closures/cls_ushort.c libffi.closures/err_bad_abi.c              \
-libffi.closures/ffitest.h libffi.closures/nested_struct.c               \
-libffi.closures/nested_struct1.c libffi.closures/nested_struct10.c      \
-libffi.closures/nested_struct11.c libffi.closures/nested_struct12.c     \
-libffi.closures/nested_struct13.c libffi.closures/nested_struct2.c      \
-libffi.closures/nested_struct3.c libffi.closures/nested_struct4.c       \
-libffi.closures/nested_struct5.c libffi.closures/nested_struct6.c       \
-libffi.closures/nested_struct7.c libffi.closures/nested_struct8.c       \
-libffi.closures/nested_struct9.c libffi.closures/problem1.c             \
-libffi.closures/single_entry_structs1.c                                 \
-libffi.closures/single_entry_structs2.c                                 \
-libffi.closures/single_entry_structs3.c libffi.closures/stret_large.c   \
-libffi.closures/stret_large2.c libffi.closures/stret_medium.c           \
-libffi.closures/stret_medium2.c libffi.closures/testclosure.c           \
-libffi.closures/unwindtest.cc libffi.closures/unwindtest_ffi_call.cc    \
-libffi.closures/cls_align_longdouble_split.c                            \
-libffi.closures/cls_align_longdouble_split2.c                           \
-libffi.closures/cls_longdouble.c libffi.closures/huge_struct.c          \
-libffi.complex/cls_align_complex.inc                                    \
-libffi.complex/cls_align_complex_double.c                               \
-libffi.complex/cls_align_complex_float.c                                \
-libffi.complex/cls_align_complex_longdouble.c                           \
-libffi.complex/cls_complex.inc libffi.complex/cls_complex_double.c      \
-libffi.complex/cls_complex_float.c                                      \
-libffi.complex/cls_complex_longdouble.c                                 \
-libffi.complex/cls_complex_struct.inc                                   \
-libffi.complex/cls_complex_struct_double.c                              \
-libffi.complex/cls_complex_struct_float.c                               \
-libffi.complex/cls_complex_struct_longdouble.c                          \
-libffi.complex/cls_complex_va.inc                                       \
-libffi.complex/cls_complex_va_double.c                                  \
-libffi.complex/cls_complex_va_float.c                                   \
-libffi.complex/cls_complex_va_longdouble.c libffi.complex/complex.exp   \
-libffi.complex/complex.inc libffi.complex/complex_defs_double.inc       \
-libffi.complex/complex_defs_float.inc                                   \
-libffi.complex/complex_defs_longdouble.inc                              \
-libffi.complex/complex_double.c libffi.complex/complex_float.c          \
-libffi.complex/complex_int.c libffi.complex/complex_longdouble.c        \
-libffi.complex/ffitest.h libffi.complex/many_complex.inc                \
-libffi.complex/many_complex_double.c                                    \
-libffi.complex/many_complex_float.c                                     \
-libffi.complex/many_complex_longdouble.c                                \
-libffi.complex/return_complex.inc libffi.complex/return_complex1.inc    \
-libffi.complex/return_complex1_double.c                                 \
-libffi.complex/return_complex1_float.c                                  \
-libffi.complex/return_complex1_longdouble.c                             \
-libffi.complex/return_complex2.inc                                      \
-libffi.complex/return_complex2_double.c                                 \
-libffi.complex/return_complex2_float.c                                  \
-libffi.complex/return_complex2_longdouble.c                             \
-libffi.complex/return_complex_double.c                                  \
-libffi.complex/return_complex_float.c                                   \
-libffi.complex/return_complex_longdouble.c libffi.go/aa-direct.c        \
-libffi.go/closure1.c libffi.go/ffitest.h libffi.go/go.exp               \
-libffi.go/static-chain.h