repo2/package.pl @ 445
130 | markw | #!/usr/bin/perl -w
|
|
use POSIX qw(strftime);
|
|||
my @files;
|
|||
push @files, glob("mcc216/build*/output_files/*.arg");
|
|||
push @files, glob("mcc216/build*/output_files/*.sof");
|
|||
push @files, glob("mcc216/build*/output_files/*.rbf");
|
|||
push @files, glob("mcc216/build*/output_files/*.summary");
|
|||
push @files, glob("mcc216/build*/output_files/*.rpt");
|
|||
300 | markw | push @files, glob("mcc216_5200/build*/output_files/*.arg");
|
|
push @files, glob("mcc216_5200/build*/output_files/*.sof");
|
|||
push @files, glob("mcc216_5200/build*/output_files/*.rbf");
|
|||
push @files, glob("mcc216_5200/build*/output_files/*.summary");
|
|||
push @files, glob("mcc216_5200/build*/output_files/*.rpt");
|
|||
199 | markw | push @files, glob("mcctv/build*/output_files/*.arg");
|
|
push @files, glob("mcctv/build*/output_files/*.sof");
|
|||
push @files, glob("mcctv/build*/output_files/*.rbf");
|
|||
push @files, glob("mcctv/build*/output_files/*.summary");
|
|||
push @files, glob("mcctv/build*/output_files/*.rpt");
|
|||
300 | markw | push @files, glob("mcctv_5200/build*/output_files/*.arg");
|
|
push @files, glob("mcctv_5200/build*/output_files/*.sof");
|
|||
push @files, glob("mcctv_5200/build*/output_files/*.rbf");
|
|||
push @files, glob("mcctv_5200/build*/output_files/*.summary");
|
|||
push @files, glob("mcctv_5200/build*/output_files/*.rpt");
|
|||
130 | markw | push @files, glob("mist/build*/out/*.sof");
|
|
push @files, glob("mist/build*/out/*.rbf");
|
|||
push @files, glob("mist/build*/out/*.summary");
|
|||
push @files, glob("mist/build*/out/*.rpt");
|
|||
199 | markw | push @files, glob("mist_5200/build*/out/*.sof");
|
|
push @files, glob("mist_5200/build*/out/*.rbf");
|
|||
push @files, glob("mist_5200/build*/out/*.summary");
|
|||
push @files, glob("mist_5200/build*/out/*.rpt");
|
|||
133 | markw | push @files, glob("chameleon/build*/output_files/*.sof");
|
|
push @files, glob("chameleon/build*/output_files/*.rbf");
|
|||
push @files, glob("chameleon/build*/output_files/*.summary");
|
|||
push @files, glob("chameleon/build*/output_files/*.rpt");
|
|||
130 | markw | ||
push @files, glob("de1/build*/output_files/*.sof");
|
|||
300 | markw | push @files, glob("de1/build*/output_files/*.pof");
|
|
130 | markw | push @files, glob("de1/build*/output_files/*.summary");
|
|
push @files, glob("de1/build*/output_files/*.rpt");
|
|||
199 | markw | push @files, glob("de1_5200/build*/output_files/*.sof");
|
|
300 | markw | push @files, glob("de1_5200/build*/output_files/*.pof");
|
|
199 | markw | push @files, glob("de1_5200/build*/output_files/*.summary");
|
|
push @files, glob("de1_5200/build*/output_files/*.rpt");
|
|||
311 | markw | push @files, glob("sockit/build*/output_files/*.sof");
|
|
312 | markw | push @files, glob("sockit/build*/output_files/*.rbf");
|
|
311 | markw | push @files, glob("sockit/build*/output_files/*.summary");
|
|
push @files, glob("sockit/build*/output_files/*.rpt");
|
|||
push @files, glob("sockit/SOCKIT.elf");
|
|||
push @files, glob("sockit/type");
|
|||
push @files, glob("sockit/reboot");
|
|||
341 | markw | push @files, glob("papilioduo/build*/*.bit");
|
|
372 | markw | push @files, glob("aeon_lite/build*/*.bit");
|
|
376 | markw | push @files, glob("aeon_lite/build*/*.bin");
|
|
372 | markw | ||
130 | markw | push @files, glob("replay/sdcard/*.bin");
|
|
push @files, glob("replay/sdcard/*.ini");
|
|||
mkdir "/var/www/html/autobuild/";
|
|||
my $date = strftime("%Y%m%d",gmtime);
|
|||
my $dir = "/var/www/html/autobuild/$date";
|
|||
mkdir $dir;
|
|||
open (LOG,">".$dir."/log") or die "Failed to open log";
|
|||
foreach (@files)
|
|||
{
|
|||
my $creationtime = (stat($_))[9];
|
|||
my $creation = strftime("%Y%m%dT%T",gmtime($creationtime));
|
|||
print LOG "File:$_ Date:$creation\n";
|
|||
/(.*)\/(.*)/;
|
|||
my ($dir2,$file) = ($1,$2);
|
|||
#print "DIR:$dir2 FILE:$file\n";
|
|||
`mkdir -p $dir/$dir2`;
|
|||
`cp -f $_ $dir/$dir2`;
|
|||
}
|
|||
close(LOG);
|
|||
`cp -f instructions.txt $dir/`;
|
|||
136 | markw | `cp -f chameleon_setup.txt $dir/`;
|
|
130 | markw |