rgb-led-string: Christmas tree mod after real-world testing
[tinyboard.git] / projects / step-up / version.pl
1 #!/usr/bin/perl -w
2
3 use strict;
4 use POSIX qw(strftime);
5
6 my $git = `git rev-parse --short HEAD`;
7 chomp $git;
8
9 my $now = strftime('%Y%m%d', localtime(time));
10
11 print <<EOF;
12 /* DO NOT EDIT - GENERATED BY $0 */
13
14 #include <avr/eeprom.h>
15
16 unsigned char version[] EEMEM = {
17 EOF
18
19 print hex2c($git, "git revision");
20 print hex2c($now, "date");
21
22 print "};\n\n/* EOF - this file has not been truncated */\n\n";
23
24 sub hex2c {
25         my ($data, $comment) = @_;
26
27         my $data1 = $data;
28         $data1 .= '0' if (length($data1) & 1 == 1);
29         $data1 =~ s/(..)/0x$1, /g;
30         return "\t$data1 /* $comment $data */\n";
31 }
32