main.cpp

   1 #include <iostream>
   2 #include <fstream>
   3 #include <iterator>
   4 #include <algorithm>
   5 #include <cassert>
   6 #include <ctime>
   7
   8 #include "filedata.hpp"
   9
  10 using namespace std;
  11
  12 static const unsigned int bytes_in_block = 0x800;
  13 static const char * dbname = "/var/lib/backups/backups.db";
  14
  15 unsigned long long current_time() {
  16   unsigned long long rc = 0;
  17   time_t now_tt = time( 0 );
  18   tm *now = localtime( &now_tt );
  19   rc += ( now->tm_year + 1900ULL ) * 10000000000ULL;
  20   rc += ( now->tm_mon  + 1ULL )    * 100000000ULL;
  21   rc +=   now->tm_mday             * 1000000ULL;
  22   rc +=   now->tm_hour             * 10000ULL;
  23   rc +=   now->tm_min              * 100ULL;
  24   rc +=   now->tm_sec;
  25
  26   return rc;
  27 }
  28
  29 template<class I, class O, class INT>
  30 bool copy_until_full( I begin, I end, O out, INT &space ) {
  31   bool complete = true;
  32
  33   I i = begin;
  34   while( 0 != space && i != end ) {
  35     INT size = (*i)->getFileSize();
  36     INT blocksize = blocks( size ) * bytes_in_block;
  37
  38     if( blocksize <= space ) {
  39       space -= blocksize;
  40       out = *i;
  41       ++out;
  42     } else {
  43       // We missed a file that should be included so the backup is not complete
  44       complete = false;
  45     }
  46     ++i;
  47   }
  48   return complete;
  49 }
  50
  51 template<class SET>
  52 void populate_set( istream &in, SET &files ) {
  53   do {
  54     FileData *data = new FileData();
  55     in >> data;
  56     if( data->getFileName().size() ) {
  57       files.insert( data );
  58     } else {
  59       delete data;
  60     }
  61   } while( ! in.eof() );
  62 }
  63
  64 template<class SET>
  65 void partition_sets( const SET &current, const SET &old,
  66                      SET &added, SET &common, SET &old_common, SET &deleted  ) {
  67   FileDataNameCmp cmp;
  68
  69   set_difference( current.begin(), current.end(),
  70                   old.begin(),     old.end(),
  71                   inserter( added, added.begin() ),
  72                   cmp );
  73
  74   set_difference( old.begin(),     old.end(),
  75                   current.begin(), current.end(),
  76                   inserter( deleted, deleted.begin() ),
  77                   cmp );
  78
  79   set_union(      current.begin(), current.end(),
  80                   old.begin(),     old.end(),
  81                   inserter( common, common.begin() ),
  82                   cmp );
  83
  84   set_union(      old.begin(),    old.end(),
  85                   common.begin(), common.end(),
  86                   inserter( old_common, old_common.begin() ),
  87                   cmp );
  88 }
  89
  90 template<class INT>
  91 INT blocks( const INT &bytes ) {
  92   INT numblocks = bytes / bytes_in_block;
  93   if( 0 != bytes % bytes_in_block ) numblocks++;
  94
  95   return numblocks;
  96 }
  97
  98 template<class ITER, class INT>
  99 void sizes( ITER begin, const ITER &end, INT &numblocks, INT &numbytes ) {
 100   numblocks = 0;
 101   numbytes  = 0;
 102
 103   while( begin != end ) {
 104     INT filesize = (*begin)->getFileSize();
 105
 106     numbytes  += filesize;
 107     numblocks += blocks( filesize );
 108     begin++;
 109   }
 110 }
 111
 112 template<class I, class O>
 113 void copy_filenames( I begin, const I &end, O out ) {
 114   while( begin != end ) {
 115     string output = (*begin)->getFileName();
 116     output.push_back( 0 );
 117     *out = output;
 118     ++out;
 119     ++begin;
 120   }
 121 }
 122
 123 int main() {
 124   // Parse the list of current files on stdin
 125   file_set current;
 126   populate_set( cin, current );
 127
 128   file_set backed_up;
 129   ifstream db( dbname );
 130   if( db && db.good() ) {
 131     populate_set( db, backed_up );
 132   }
 133
 134   // Now divide the two sets into three sets (added, deleted and common )
 135   file_set added, deleted, common, old_common;
 136   partition_sets( current, backed_up, added, common, old_common, deleted );
 137
 138   // Now find the list of files to backup.
 139   file_set backups;
 140   insert_iterator<file_set> backups_i( backups, backups.begin() );
 141
 142   // backup all added files
 143   copy( added.begin(), added.end(), backups_i );
 144
 145   // Track the total size of added files
 146   unsigned long long added_blocks, added_bytes;
 147   sizes( backups.begin(), backups.end(), added_blocks, added_bytes );
 148
 149   file_vector modified_files;
 150   // Backup files that have been modified
 151   file_set::iterator i = common.begin(), j = old_common.begin();
 152   for( ; i != common.end(); ++i, ++j ) {
 153     (*i)->setLastBackupDate( (*j)->getLastBackupDate() );
 154
 155     if( needs_backup( *j, *i ) ) modified_files.push_back( *i );
 156   }
 157
 158   copy( modified_files.begin(), modified_files.end(), backups_i );
 159
 160   // Track the total size of modified files
 161   unsigned long long modified_blocks, modified_bytes;
 162   sizes( modified_files.begin(), modified_files.end(), modified_blocks, modified_bytes );
 163
 164   // Now, sort the backups by filesize and build a list that'll fit on a DVD
 165   file_vector backups_s;
 166   copy( backups.begin(), backups.end(), back_inserter( backups_s ) );
 167
 168   FileDataSizeCmp sizecmp;
 169   sort( backups_s.begin(), backups_s.end(), sizecmp );
 170
 171   file_set final;
 172   unsigned long long space = 0x100000000ULL; // After looking at how big the ISO can be and how many 1K blocks are left after formatting the filesystem I decided on an even 4GB target
 173
 174   insert_iterator<file_set> final_i( final, final.begin() );
 175
 176   // Copy files over until full or out of files
 177   bool complete = copy_until_full( backups_s.rbegin(),
 178                                    backups_s.rend(),
 179                                    final_i,
 180                                    space );
 181
 182   // Track the size filled up by essential backups
 183   unsigned long long essential_blocks, essential_bytes;
 184   sizes( final.begin(), final.end(), essential_blocks, essential_bytes );
 185
 186   // Now, sort the non-backed-up list by last_backup_date and back-fill
 187   if( 0 != space ) {
 188     file_vector leftovers;
 189     FileDataNameCmp cmp;
 190     set_difference( current.begin(), current.end(),
 191                     final.begin(),   final.end(),
 192                     back_inserter( leftovers ),
 193                     cmp );
 194
 195     FileDataLastBackupCmp lastbackupcmp;
 196     sort( leftovers.begin(), leftovers.end(), lastbackupcmp );
 197
 198     copy_until_full( leftovers.begin(), leftovers.end(), final_i, space );
 199   }
 200
 201   // Track the total size to be copied to the dvd
 202   unsigned long long total_blocks, total_bytes;
 203   sizes( final.begin(), final.end(), total_blocks, total_bytes );
 204
 205   unsigned long long now = current_time();
 206   for( file_set::iterator k = final.begin(); k != final.end(); ++k ) {
 207     (*k)->setLastBackupDate( now );
 208   }
 209
 210   // Write the 'current' list to the dbfile
 211   ofstream dbout( dbname );
 212   copy( current.begin(), current.end(), ostream_iterator<FileData*>( dbout, "" ) );
 213
 214   // Write the 'final' list to stdout
 215   copy_filenames( final.begin(), final.end(), ostream_iterator<string>( cout, "" ) );
 216
 217   cerr << "Need backing up..." << endl;
 218   cerr << "     Added Bytes:            " << added_bytes << endl;
 219   cerr << "     Added Blocks:           " << added_blocks << endl;
 220   cerr << "     Modified Bytes:         " << modified_bytes << endl;
 221   cerr << "     Modified Blocks:        " << modified_blocks << endl << endl;
 222
 223   cerr << "Will be backed up..." << endl;
 224   cerr << "     Essential Bytes:        " << essential_bytes << endl;
 225   cerr << "     Essential Blocks:       " << essential_blocks << endl;
 226   cerr << "     Total Bytes:            " << total_bytes << endl;
 227   cerr << "     Total Blocks:           " << total_blocks << endl << endl;
 228
 229   if( ! complete ) { cerr << "Backup is incomplete!" << endl; }
 230
 231   // Clean-up
 232   for( file_set::iterator i = backed_up.begin(); i != backed_up.end(); ++i ) { delete *i; }
 233   for( file_set::iterator i = current.begin();   i != current.end();   ++i ) { delete *i; }
 234 }