#!/usr/bin/env perl | |
while (<>) { | |
/^(# )?CONFIG_([^=]+)(=(.+)| is not set)/ and do { | |
my $default = $4; | |
$1 and $default = "n"; | |
my $name = $2; | |
my $type = "bool"; | |
$default =~ /^\"/ and $type = "string"; | |
$default =~ /^\d/ and $type = "int"; | |
print "config BUSYBOX_DEFAULT_$name\n\t$type\n\tdefault $default\n"; | |
}; | |
} |