mirror of
				https://sourceware.org/git/glibc.git
				synced 2025-11-03 20:53:13 +03:00 
			
		
		
		
	
		
			
				
	
	
		
			64 lines
		
	
	
		
			1.8 KiB
		
	
	
	
		
			Awk
		
	
	
	
	
	
			
		
		
	
	
			64 lines
		
	
	
		
			1.8 KiB
		
	
	
	
		
			Awk
		
	
	
	
	
	
# Script used in producing headers of assembly constants from C expressions.
 | 
						|
# The input to this script looks like:
 | 
						|
#	#cpp-directive ...
 | 
						|
#	NAME1
 | 
						|
#	NAME2 expression ...
 | 
						|
# The output of this script is C code to be run through gcc -S and then
 | 
						|
# massaged to extract the integer constant values of the given C expressions.
 | 
						|
# A line giving just a name implies an expression consisting of just that name.
 | 
						|
 | 
						|
BEGIN { started = 0 }
 | 
						|
 | 
						|
# cpp directives go straight through.
 | 
						|
/^#/ { print; next }
 | 
						|
 | 
						|
NF >= 1 && !started {
 | 
						|
  if (test) {
 | 
						|
    print "\n#include <inttypes.h>";
 | 
						|
    print "\n#include <stdio.h>";
 | 
						|
    print "\n#include <bits/wordsize.h>";
 | 
						|
    print "\n#if __WORDSIZE == 64";
 | 
						|
    print "\ntypedef uint64_t c_t;";
 | 
						|
    print "\n#define U(n) UINT64_C (n)";
 | 
						|
    print "\n#define PRI PRId64";
 | 
						|
    print "\n#else";
 | 
						|
    print "\ntypedef uint32_t c_t;";
 | 
						|
    print "\n#define U(n) UINT32_C (n)";
 | 
						|
    print "\n#define PRI PRId32";
 | 
						|
    print "\n#endif";
 | 
						|
    print "\nstatic int do_test (void)\n{\n  int bad = 0, good = 0;\n";
 | 
						|
    print "#define TEST(name, source, expr) \\\n" \
 | 
						|
      "  if (U (asconst_##name) != (c_t) (expr)) { ++bad;" \
 | 
						|
      " fprintf (stderr, \"%s: %s is %\" PRI \" but %s is %\"PRI \"\\n\"," \
 | 
						|
      " source, #name, U (asconst_##name), #expr, (c_t) (expr));" \
 | 
						|
      " } else ++good;\n";
 | 
						|
  }
 | 
						|
  else
 | 
						|
    print "void dummy(void) {";
 | 
						|
  started = 1;
 | 
						|
}
 | 
						|
 | 
						|
# Separator.
 | 
						|
$1 == "--" { next }
 | 
						|
 | 
						|
NF == 1 { sub(/^.*$/, "& &"); }
 | 
						|
 | 
						|
NF > 1 {
 | 
						|
  name = $1;
 | 
						|
  sub(/^[^ 	]+[ 	]+/, "");
 | 
						|
  if (test)
 | 
						|
    print "  TEST (" name ", \"" FILENAME ":" FNR "\", " $0 ")";
 | 
						|
  else
 | 
						|
    printf "asm (\"@@@name@@@%s@@@value@@@%%0@@@end@@@\" : : \"i\" ((long) %s));\n",
 | 
						|
      name, $0;
 | 
						|
}
 | 
						|
 | 
						|
END {
 | 
						|
  if (test) {
 | 
						|
    print "  printf (\"%d errors in %d tests\\n\", bad, good + bad);"
 | 
						|
    print "  return bad != 0 || good == 0;\n}\n";
 | 
						|
    print "#define TEST_FUNCTION do_test ()";
 | 
						|
  }
 | 
						|
  else if (started) print "}";
 | 
						|
}
 |