| b.liu | e958203 | 2025-04-17 19:18:16 +0800 | [diff] [blame^] | 1 | #!/usr/bin/env perl |
| 2 | |||||
| 3 | while (<>) { | ||||
| 4 | /^(# )?CONFIG_([^=]+)(=(.+)| is not set)/ and do { | ||||
| 5 | my $default = $4; | ||||
| 6 | $1 and $default = "n"; | ||||
| 7 | my $name = $2; | ||||
| 8 | my $type = "bool"; | ||||
| 9 | $default =~ /^\"/ and $type = "string"; | ||||
| 10 | $default =~ /^\d/ and $type = "int"; | ||||
| 11 | print "config BUSYBOX_DEFAULT_$name\n\t$type\n\tdefault $default\n"; | ||||
| 12 | }; | ||||
| 13 | } | ||||