home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / compsrcs / misc / volume06 / fdecs < prev    next >
Encoding:
Internet Message Format  |  1991-08-27  |  5.2 KB
  1. Path: wugate!wucs1!uunet!allbery
  2. From: allbery@uunet.UU.NET (Brandon S. Allbery - comp.sources.misc)
  3. Newsgroups: comp.sources.misc
  4. Subject: v06i073: fdecs - generate pANS prototypes from K&R C code
  5. Message-ID: <8903141605.AA01288@m10ux>
  6. Date: 22 Mar 89 05:36:39 GMT
  7. Sender: allbery@uunet.UU.NET
  8. Reply-To: mnc@m10ux.UUCP (52171.3-Michael Condict-- MHx5911 (MH0000)M999)
  9. Lines: 235
  10. Approved: allbery@uunet.UU.NET (Brandon S. Allbery - comp.sources.misc)
  11.  
  12. Posting-number: Volume 6, Issue 73
  13. Submitted-by: mnc@m10ux.UUCP (52171.3-Michael Condict-- MHx5911 (MH0000)M999)
  14. Archive-name: fdecs
  15.  
  16. [My, there's a lot of this kind of thing floating around recently.  ++bsa]
  17.  
  18. This shell script (fdecs) extracts ANSI-C function prototype declarations,
  19. suitable for use in a .h file, from C source files that contain old-style
  20. function definitions.  See the comment at the top of fdecs for more info.
  21.  
  22. The only option is "-Idir", which causes the C source to be run through the
  23. C preprocessor before the prototype extraction is done.
  24.  
  25. Mike Condict
  26.  
  27. ---------------------------- cut here --------------------------------------
  28. #!/bin/sh
  29. # This is a shar archive.
  30. # The rest of this file is a shell script which will extract:
  31. #
  32. # fdecs fdecs1.sed fdecs2.sed fdecs3.sed
  33. #
  34. # To extract the files from this shell archive file simply
  35. # create a directory for this file, move the archive file
  36. # to it and enter the command
  37. #
  38. #    sh filename
  39. # 
  40. # The files will be extracted automatically.
  41. # Note: Do not use csh.
  42. #
  43. # Archive created: Tue Mar 14 10:29:50 EST 1989
  44. #
  45. echo x - fdecs
  46. sed 's/^X//' > fdecs << '@FUNKY STUFF@'
  47.  
  48. # This script, given C source files, finds all the function definitions
  49. # of the form "type_decl f(a,b,...) type_decl a; type_decl b; ... { body }",
  50. # and outputs a file of extern function declarations suitable for a .h file.
  51. # There need not be a type_decl for each argument (defaults to int) and the
  52. # type_decl's can be in a different order from the arg list.  Multiple args
  53. # can be declared in the standard abbreviated fashion: "int a, *b;".
  54. #
  55. # The only restriction is that the type_decl's must be no more complicated
  56. # than what can be formed with type words, names, "*" and "[]".  That is the
  57. # type_decl's may not contain "struct ... {...}" or "float (*x)()" although,
  58. # e.g., "struct A" is allowed.
  59. #
  60. # The output is one line of the form 
  61. #
  62. #    type_decl f(type_decl a, type_decl b, . . . );
  63. #
  64. # for each function f defined in the source files, i.e. a legal ANSI-C
  65. # function prototype.
  66.  
  67. SEDDIR=~mnc/src/fdecs
  68.  
  69. Iflag=""
  70. while [ "$#" -gt 0 ]; do
  71.     case "$1" in
  72.     -I*)    Iflag="$Iflag $1"; shift
  73.         ;;
  74.     -*)    echo "Usage: $0 [ -Iincl_dir ] ... file ..."
  75.         echo "       (use -I only if C preprocessor is wanted)"
  76.         exit 1
  77.         ;;
  78.     *)    break ;;
  79.     esac
  80. done
  81.  
  82. if [ "$#" -eq 0 ] ; then
  83.     sed -f $SEDDIR/fdecs1.sed |
  84.     sed -f $SEDDIR/fdecs2.sed | sed -f $SEDDIR/fdecs3.sed
  85. elif [ "X$Iflag" != X ] ; then
  86.     # User wants to run the C files through the preprocessor, with
  87.     # the specified -I flag.  We delete the contents of the
  88.     # .h files from the preprocessor's output.  We also need to
  89.     # delete any occurrences of '^$filename:', which some versions
  90.     # of cc -E put out at the beginning of every file:
  91.     cc -E $Iflag "$@" | \
  92.         sed -e '#n No automatic printing
  93.  
  94.             # Delete contents of included .h files:
  95.             : chkhdr
  96.             /^# [1-9][0-9]* ".*\.h"/{
  97.                 : delhdr
  98.                     n
  99.                 /^#/!b delhdr
  100.                 b chkhdr
  101.             }
  102.             # Delete "filename:" inserted by "cc -E":
  103.             /^[^     ]*\.[ch]:[     ]*$/d
  104.             ' \
  105.             -f $SEDDIR/fdecs1.sed \
  106.             -e 'p' |
  107.         sed -f $SEDDIR/fdecs2.sed | sed -f $SEDDIR/fdecs3.sed
  108. else
  109.     sed -f $SEDDIR/fdecs1.sed "$@" |
  110.         sed -f $SEDDIR/fdecs2.sed | sed -f $SEDDIR/fdecs3.sed
  111. fi
  112. @FUNKY STUFF@
  113. ls -l fdecs
  114. echo x - fdecs1.sed
  115. sed 's/^X//' > fdecs1.sed << '@FUNKY STUFF@'
  116.  
  117. : morebs
  118. /\\$/ {
  119.     N
  120.     s/\\\n//
  121.     b morebs
  122. }
  123.  
  124. /^[     ]*$/d
  125.  
  126. : delcom
  127. /\/\*/{
  128.     s/@/ /g
  129.     s:/\*:@:
  130.  
  131.     : morecm
  132.     /\*\//!{
  133.         s/@.*/@/
  134.         N
  135.         b morecm
  136.     }
  137.  
  138.     s/\$/ /g
  139.  
  140.     s:\*/:$:
  141.     s/@[^$]*\$/ /
  142.  
  143.     b delcom
  144. }
  145.  
  146. /^#/d
  147.  
  148. s/\\"/ /g
  149. s/"[^"]*"/0/g
  150. s/\\'/ /g
  151. s/'[^']*'/0/g
  152.  
  153. /^[     ]*$/d
  154. @FUNKY STUFF@
  155. ls -l fdecs1.sed
  156. echo x - fdecs2.sed
  157. sed 's/^X//' > fdecs2.sed << '@FUNKY STUFF@'
  158. : delcbrc
  159. /{/{
  160.     s/{[^{}]*/{/g
  161.     : getcbrc
  162.     /}/!{
  163.         N
  164.         s/{[^{}]*/{/g
  165.         b getcbrc
  166.     }
  167.     s/{[^{}]*}/#/g
  168.     b delcbrc
  169. }
  170. s/#/{}/g
  171. @FUNKY STUFF@
  172. ls -l fdecs2.sed
  173. echo x - fdecs3.sed
  174. sed 's/^X//' > fdecs3.sed << '@FUNKY STUFF@'
  175.  
  176.  
  177. : doline
  178.  
  179.  
  180. : getsbr
  181. /[;{]/!{
  182.     N
  183.     b getsbr
  184. }
  185.  
  186. s/\n/ /g
  187. s/[     ][     ]*/ /g
  188.  
  189.  
  190. /;/{
  191.     /^[^;]*) *[a-zA-Z_{]/!{
  192.         s/^[^;]*;//
  193.         /^ *$/d
  194.         b doline
  195.     }
  196. }
  197.  
  198.  
  199. /[;)] *{}/!{
  200.     N
  201.     b doline
  202. }
  203.  
  204. s/^  *//
  205. s/( */(/g
  206. s/ *)/)/g
  207. s/ *, */, /g
  208. s/ *; */; /g
  209. s/ *\*/ \*/g
  210. s/\*  */\*/g
  211.  
  212.  
  213.  
  214. /() *{/b no_arg
  215.     s/, /, %/g
  216.     s/(/(, %/
  217.  
  218.     t more_t
  219.     : more_t
  220.         s/, %\([A-Za-z_][A-Za-z0-9_]*\)\(.*[);] *\)\([A-Za-z_][A-Za-z0-9_{} ]*\)\( *\)\(\**\1[][]*\)\([,;]\)/, \3 \5\2\3\4@\6/
  221.         s/, %\([A-Za-z_][A-Za-z0-9_]*\)\(.*[);] *\)\([A-Za-z_][A-Za-z0-9_{} ]*\)\( [^;]*, %\)\(\**\1[][]*\)\([,;]\)/, \3 \5\2\3\4@\6/
  222.     t more_t
  223.     
  224.     s/(, /(/
  225.     
  226.     s/%/int /g
  227.  
  228.     s?(\([^)]*\)).*?(\1);?
  229.  
  230.     / register/{
  231.         s/\([A-Za-z_0-9]\) register\([^A-Za-z0-9_]\)/\1\2/g
  232.         s/ register\([^A-Za-z0-9_][^A-Za-z0-9_]*[A-Za-z_][A-Za-z0-9_]*\),/ int\1,/g
  233.         s/ register\([^A-Za-z0-9_]\)/ \1/g
  234.     }
  235.  
  236.     s/   */ /g
  237.  
  238.     b done_a
  239. : no_arg
  240.     s/).*/void);/
  241. : done_a
  242. @FUNKY STUFF@
  243. ls -l fdecs3.sed
  244. # The following exit is to ensure that extra garbage 
  245. # after the end of the shar file will be ignored.
  246. exit 0
  247.