diff options
author | Daniel Stenberg <daniel@haxx.se> | 2001-04-10 15:30:01 +0000 |
---|---|---|
committer | Daniel Stenberg <daniel@haxx.se> | 2001-04-10 15:30:01 +0000 |
commit | 04c10e021c426beedf9f7b6f82d6d90ecbdb1cae (patch) | |
tree | d0e5908226fe493019a2017855d3288d4717b24b /java | |
parent | d712a4e800ea002a1d980b201d28f033d2bcc8cb (diff) |
C header to java converter
Diffstat (limited to 'java')
-rwxr-xr-x | java/define2java.pl | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/java/define2java.pl b/java/define2java.pl new file mode 100755 index 000000000..a9d470a6f --- /dev/null +++ b/java/define2java.pl @@ -0,0 +1,22 @@ +#!/usr/bin/perl + +open(GCC, "gcc -E ../include/curl/curl.h|"); + +while(<GCC>) { + if($_ =~ /(CURLOPT_(.*)) += (.*)/) { + $var= $1; + $expr = $3; + $f=$3; + if($expr =~ / *(\d+) *\+ *(\d+)/) { + $expr = $1+$2; + } + + # nah, keep the CURL prefix to make them look like other + # languages' defines + # $var =~ s/^CURL//g; + + print " public static final int $var = $expr;\n"; + } +} + +close(GCC); |