| dnl Copyright (C) 2012-2024 Free Software Foundation, Inc. | 
 | dnl | 
 | dnl This file is part of GDB. | 
 | 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 3 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 <http://www.gnu.org/licenses/>. | 
 |  | 
 | dnl Check the return and argument types of ptrace. | 
 |  | 
 | AC_DEFUN([GDB_AC_PTRACE], | 
 | [ | 
 |  | 
 | AC_CHECK_HEADERS([sys/ptrace.h ptrace.h]) | 
 |  | 
 | gdb_ptrace_headers=' | 
 | #include <sys/types.h> | 
 | #if HAVE_SYS_PTRACE_H | 
 | # include <sys/ptrace.h> | 
 | #endif | 
 | #if HAVE_UNISTD_H | 
 | # include <unistd.h> | 
 | #endif | 
 | ' | 
 |  | 
 | # Check return type.  Varargs (used on GNU/Linux) conflict with the | 
 | # empty argument list, so check for that explicitly. | 
 | AC_CACHE_CHECK( | 
 |   [return type of ptrace], | 
 |   [gdb_cv_func_ptrace_ret], | 
 |   [AC_COMPILE_IFELSE( | 
 |      [AC_LANG_PROGRAM( | 
 | 	[$gdb_ptrace_headers], | 
 | 	[extern long ptrace (enum __ptrace_request, ...);] | 
 |       )], | 
 |      [gdb_cv_func_ptrace_ret='long'], | 
 |      [AC_COMPILE_IFELSE( | 
 | 	[AC_LANG_PROGRAM( | 
 | 	   [$gdb_ptrace_headers], | 
 | 	   [extern int ptrace ();] | 
 | 	 )], | 
 | 	[gdb_cv_func_ptrace_ret='int'], | 
 | 	[gdb_cv_func_ptrace_ret='long'] | 
 |       )] | 
 |    )] | 
 | ) | 
 |  | 
 | AC_DEFINE_UNQUOTED( | 
 |   [PTRACE_TYPE_RET], | 
 |   [$gdb_cv_func_ptrace_ret], | 
 |   [Define as the return type of ptrace.] | 
 | ) | 
 |  | 
 | # Check argument types. | 
 | AC_CACHE_CHECK( | 
 |   [types of arguments for ptrace], | 
 |   [gdb_cv_func_ptrace_args], | 
 |   [AC_COMPILE_IFELSE( | 
 |      [AC_LANG_PROGRAM( | 
 | 	[$gdb_ptrace_headers], | 
 | 	[extern long ptrace (enum __ptrace_request, ...);] | 
 |       )], | 
 |      [gdb_cv_func_ptrace_args='enum __ptrace_request,int,long,long'], | 
 |      [for gdb_arg1 in 'int' 'long'; do | 
 | 	for gdb_arg2 in 'pid_t' 'int' 'long'; do | 
 | 	  for gdb_arg3 in 'int *' 'caddr_t' 'int' 'long' 'void *'; do | 
 | 	    for gdb_arg4 in 'int' 'long' 'void *'; do | 
 | 	      AC_COMPILE_IFELSE( | 
 | 		[AC_LANG_PROGRAM( | 
 | 		   [$gdb_ptrace_headers], | 
 | 		   [extern $gdb_cv_func_ptrace_ret ptrace ($gdb_arg1, $gdb_arg2, $gdb_arg3, $gdb_arg4);] | 
 | 		 )], | 
 | 		[gdb_cv_func_ptrace_args="$gdb_arg1,$gdb_arg2,$gdb_arg3,$gdb_arg4"; | 
 | 		 break 4;] | 
 | 	      ) | 
 |  | 
 | 	      for gdb_arg5 in 'int *' 'int' 'long'; do | 
 | 		AC_COMPILE_IFELSE( | 
 | 		  [AC_LANG_PROGRAM( | 
 | 		     [$gdb_ptrace_headers], | 
 | 		     [extern $gdb_cv_func_ptrace_ret ptrace ($gdb_arg1, $gdb_arg2, $gdb_arg3, $gdb_arg4, $gdb_arg5);] | 
 | 		   )], | 
 | 		  [gdb_cv_func_ptrace_args="$gdb_arg1,$gdb_arg2,$gdb_arg3,$gdb_arg4,$gdb_arg5"; | 
 | 		   break 5;] | 
 | 		) | 
 | 	      done | 
 | 	    done | 
 | 	  done | 
 | 	done | 
 |       done | 
 |       # Provide a safe default value. | 
 |       : ${gdb_cv_func_ptrace_args='int,int,long,long'}] | 
 |    )] | 
 | ) | 
 |  | 
 | ac_save_IFS=$IFS; IFS=',' | 
 | set dummy `echo "$gdb_cv_func_ptrace_args" | sed 's/\*/\*/g'` | 
 | IFS=$ac_save_IFS | 
 | shift | 
 | AC_DEFINE_UNQUOTED(PTRACE_TYPE_ARG1, $[1], | 
 |   [Define to the type of arg 1 for ptrace.]) | 
 | AC_DEFINE_UNQUOTED(PTRACE_TYPE_ARG3, $[3], | 
 |   [Define to the type of arg 3 for ptrace.]) | 
 | AC_DEFINE_UNQUOTED(PTRACE_TYPE_ARG4, $[4], | 
 |   [Define to the type of arg 4 for ptrace.]) | 
 | if test -n "$[5]"; then | 
 |   AC_DEFINE_UNQUOTED(PTRACE_TYPE_ARG5, $[5], | 
 |     [Define to the type of arg 5 for ptrace.]) | 
 | fi | 
 | ]) |