copying.awk 2.2 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970
  1. BEGIN {
  2. FS="\"";
  3. print "/* ==> Do not modify this file!! " \
  4. "-*- buffer-read-only: t -*- vi" \
  5. ":set ro:";
  6. print " It is created automatically by copying.awk.";
  7. print " Modify copying.awk instead. <== */";
  8. print ""
  9. print "#include \"defs.h\""
  10. print "#include \"command.h\""
  11. print "#include \"gdbcmd.h\""
  12. print ""
  13. print "static void show_copying_command (const char *, int);"
  14. print ""
  15. print "static void show_warranty_command (const char *, int);"
  16. print ""
  17. print "static void";
  18. print "show_copying_command (const char *ignore, int from_tty)";
  19. print "{";
  20. }
  21. NR == 1,/^[ ]*15\. Disclaimer of Warranty\.[ ]*$/ {
  22. if ($0 ~ / /)
  23. {
  24. printf " gdb_printf (\"\\n\");\n";
  25. }
  26. else if ($0 !~ /^[ ]*15\. Disclaimer of Warranty\.[ ]*$/)
  27. {
  28. printf " gdb_printf (\"";
  29. for (i = 1; i < NF; i++)
  30. printf "%s\\\"", $i;
  31. printf "%s\\n\");\n", $NF;
  32. }
  33. }
  34. /^[ ]*15\. Disclaimer of Warranty\.[ ]*$/ {
  35. print "}";
  36. print "";
  37. print "static void";
  38. print "show_warranty_command (const char *ignore, int from_tty)";
  39. print "{";
  40. }
  41. /^[ ]*15\. Disclaimer of Warranty\.[ ]*$/, /^[ ]*END OF TERMS AND CONDITIONS[ ]*$/{
  42. if (! ($0 ~ /^[ ]*END OF TERMS AND CONDITIONS[ ]*$/))
  43. {
  44. printf " gdb_printf (\"";
  45. for (i = 1; i < NF; i++)
  46. printf "%s\\\"", $i;
  47. printf "%s\\n\");\n", $NF;
  48. }
  49. }
  50. END {
  51. print "}";
  52. print "";
  53. print "void _initialize_copying ();"
  54. print "void"
  55. print "_initialize_copying ()";
  56. print "{";
  57. print " add_cmd (\"copying\", no_set_class, show_copying_command,";
  58. print " _(\"Conditions for redistributing copies of GDB.\"),";
  59. print " &showlist);";
  60. print " add_cmd (\"warranty\", no_set_class, show_warranty_command,";
  61. print " _(\"Various kinds of warranty you do not have.\"),";
  62. print " &showlist);";
  63. print "";
  64. print " /* For old-timers, allow \"info copying\", etc. */";
  65. print " add_info (\"copying\", show_copying_command,";
  66. print " _(\"Conditions for redistributing copies of GDB.\"));";
  67. print " add_info (\"warranty\", show_warranty_command,";
  68. print " _(\"Various kinds of warranty you do not have.\"));";
  69. print "}";
  70. }