smarbs 0.9.3

data/test/test_backup.rb

@@ -0,0 +1,171 @@
+$:.unshift File.join(File.dirname(__FILE__),'..','lib')
+$:.unshift File.join(File.dirname(__FILE__),'..','test')
+
+require 'script'
+require 'smarbs_test'
+
+class TestBackup < Test::Unit::TestCase;
+  include SmarbsTest
+
+  def setup
+    clean
+  end
+  
+  def teardown
+    clean_all
+  end
+      
+  def test_relative
+    `mkdir -p /tmp/smarbs/backmeup/inside`
+    `touch /tmp/smarbs/backmeup/other`
+    `echo "-preferences-
+-end of preferences-" > /tmp/smarbs/smarbs/backup1`
+    c = ConfigFile.new("/tmp/smarbs/smarbs/backup1")
+    c.src=(["/tmp/smarbs/backmeup"])
+    c.dest=("/tmp/smarbs/backedup")
+    c.limit=(Size.new("200m"))
+    c.dirspace =(Size.new("100m"))
+    c.relative = false
+    c.write
+    assert_success do
+      Script.new("/tmp/smarbs/smarbs/")
+    end
+    c.read
+    assert_equal Size.new("100m"), c.dirspace
+    assert_equal("inside\nother\n", `ls /tmp/smarbs/backedup/smarbsbackup/*-backup.1/backmeup/`)
+
+    assert_success do
+      Script.new("/tmp/smarbs/smarbs/")
+    end
+    c.read
+    assert_equal Size.new("90m"), c.dirspace
+
+    assert_success do
+      Script.new("/tmp/smarbs/smarbs/")
+    end
+    c.read
+    assert_equal Size.new("81m"), c.dirspace
+
+    c.dirspace = 0
+    c.write
+    assert_success do
+      Script.new("/tmp/smarbs/smarbs/")
+    end
+    c.read
+    assert_equal Size.new("13516.8"), c.dirspace
+
+    c.relative = true
+    c.write
+    assert_success do
+      Script.new("/tmp/smarbs/smarbs/")
+    end
+    assert_equal("inside\nother\n", `ls /tmp/smarbs/backedup/smarbsbackup/*-backup.1/tmp/smarbs/backmeup/`)
+
+    c.src = ["/tmp/smarbs/backmeup/other"]
+    c.write
+    assert_success do
+      Script.new("/tmp/smarbs/smarbs/")
+    end
+    assert_equal("other\n", `ls /tmp/smarbs/backedup/smarbsbackup/*-backup.1/tmp/smarbs/backmeup/`)
+
+    c.execute_before = 'touch /tmp/smarbs/i\ touched\ it'
+    c.execute_after = 'touch /tmp/smarbs/i\ touched\ it\ too'
+    c.write
+
+    assert_success do
+      Script.new("/tmp/smarbs/smarbs/")
+    end
+    assert_equal(true, File.file?("/tmp/smarbs/i touched it"))
+    assert_equal(true, File.file?("/tmp/smarbs/i touched it too"))
+
+    c.execute_before = 'ls /im/not/existing'
+    c.write
+    assert_output("The following error occured: execute_before command 'ls /im/not/existing' was not successful, aborting!
+This was the output generated:
+ls: cannot access /im/not/existing: No such file or directory") do
+      Script.new("/tmp/smarbs/smarbs/")
+    end
+
+    c.execute_after = 'ls /im/not/existing/too'
+    c.write
+    assert_output("The following error occured: execute_after command 'ls /im/not/existing/too' was not successful, aborting!
+This was the output generated:
+ls: cannot access /im/not/existing/too: No such file or directory
+
+Also, your backup was aborted: execute_before command 'ls /im/not/existing' was not successful, aborting!
+This was the output generated:
+ls: cannot access /im/not/existing: No such file or directory") do
+
+      Script.new("/tmp/smarbs/smarbs/")
+    end
+
+    c.execute_before = 'touch /tmp/smarbs/i\ touched\ it'
+    c.write
+    assert_output("The following error occured: execute_after command 'ls /im/not/existing/too' was not successful, aborting!
+This was the output generated:
+ls: cannot access /im/not/existing/too: No such file or directory") do
+      Script.new("/tmp/smarbs/smarbs/")
+    end
+
+    clean
+    cf = default_configfile
+    cf.oldestfirst = true
+    cf.maxbackuplevels = 8
+    cf.write
+    for i in 1..10
+      `mkdir -p /tmp/smarbs/backedup/smarbsbackup/a-backup.#{i}`
+    end
+    assert_backup_dirs([1, 2, 3, 4, 5, 6, 7, 8, 9, 10])
+
+    assert_success do
+      Script.new("/tmp/smarbs/smarbs/")
+    end
+    assert_backup_dirs([1, 2, 3, 4, 5, 6, 7, 8])
+
+    cf.maxbackuplevels = 0
+    cf.limit = "1.525m"
+    cf.write
+    assert_success do
+      Script.new("/tmp/smarbs/smarbs/")
+    end
+    assert_backup_dirs([1, 2, 3, 4, 5, 6])
+
+    clean
+    cf = default_configfile
+    for i in 0..3
+      `mkdir -p /tmp/smarbs/backedup/smarbsbackup/a-backup.#{i}`
+    end
+    assert_fail "Aborted backup directory 'a-backup.0' left in /tmp/smarbs/backedup/smarbsbackup/\nMove or delete it to continue!" do
+      Script.new("/tmp/smarbs/smarbs")
+    end
+    assert_backup_dirs([0, 1, 2, 3])
+
+
+    `rm -r /tmp/smarbs/backedup/smarbsbackup/a-backup.0`
+    assert_success do
+      Script.new("/tmp/smarbs/smarbs")
+    end
+    assert_backup_dirs([1, 2, 3, 4])
+
+
+    cf.ignore_leftovers=true
+    cf.write
+    assert_success do
+      Script.new("/tmp/smarbs/smarbs")
+    end
+    assert_backup_dirs([1, 2, 3, 4, 5])
+
+    
+    `mkdir -p /tmp/smarbs/backedup/smarbsbackup/a-backup.0`
+    assert_success "Warning: Aborted backup directory a-backup.0 detected.\nResuming backup there because of ignore_leftovers option." do
+      Script.new("/tmp/smarbs/smarbs")
+    end
+    assert_backup_dirs([1, 2, 3, 4, 5, 6])
+
+    assert_not_equal "a-backup.1", SmarbsBackupDir.new("/tmp/smarbs/backedup/smarbsbackup/").files.sort[2]
+
+    assert_success do
+      Script.new("/tmp/smarbs/smarbs")
+    end
+  end
+end

data/test/test_helpers.rb

@@ -0,0 +1,500 @@
+$:.unshift File.join(File.dirname(__FILE__),'..','lib')
+$:.unshift File.join(File.dirname(__FILE__),'..','test')
+
+require 'test/unit'
+require 'helpers'
+require 'smarbs_test'
+require 'log'
+
+class TestConfigString < Test::Unit::TestCase;
+  include SmarbsTest
+
+  def test_configstring
+    # One Value
+    cs = ConfigString.new("before", "", "desc1\ndesc2", "do nothing")
+    assert_equal "do nothing", cs.value
+    assert_equal "desc1\ndesc2\nbefore do nothing", cs.to_s
+
+    cs.set("do something")
+    assert_equal "do something", cs.value
+
+    assert_raise_message("Only one 'before' allowed!") do
+      cs.set(["do 1", "do 2"])
+    end
+
+    assert_raise_message("Only one 'before' allowed!") do
+      cs.add("error")
+    end
+
+    cs.clear
+    assert_equal "desc1\ndesc2\nbefore do nothing", cs.to_s
+
+    cs.add("abc")
+    assert_equal "abc", cs.value
+
+    # Many values
+    cs = ConfigString.new("before", "list", "desc1\ndesc2", ["do 1", "do 2"])
+    assert_equal ["do 1", "do 2"], cs.value
+    assert_equal "desc1\ndesc2\nbefore do 1\nbefore do 2", cs.to_s
+
+    cs.set("do something")
+    assert_equal ["do something"], cs.value
+
+    cs.set(["do 3", "do 4", "do 5"])
+    assert_equal ["do 3", "do 4", "do 5"], cs.value
+
+    cs.add(["do 5","do 7"])
+    assert_equal ["do 3", "do 4", "do 5", "do 7"], cs.value
+
+    assert_raise_message("Only one 'before' allowed!") do
+      ConfigString.new("before", "listen,nolist,kelistliste", "", ["do 1","do 2"])
+    end
+
+    assert(ConfigString.new("before", "listen,nolist,list,kelistliste,", "", ["do 1","do 2"]))
+
+    cs = ConfigString.new("before", "", "desc1\ndesc2", " ")
+    assert_equal "desc1\ndesc2\nbefore  ", cs.to_s
+  end
+end
+
+class TestConfigDirectory < Test::Unit::TestCase;
+  include SmarbsTest
+
+  def test_configdirectory
+    cs = ConfigDirectory.new("dir", "list", "desc1\ndesc2", " /home/jan/ ")
+    assert_equal ["/home/jan"], cs.value
+
+    cs.add("/ ")
+    assert_equal ["/"], cs.value
+
+    cs.add("/home/jan ")
+    assert_equal ["/", "/home/jan"], cs.value
+
+    cs.set(["/home", "/home2 / "])
+    assert_equal ["/home", "/home2"], cs.value
+  end
+end
+
+class TestConfigSize < Test::Unit::TestCase;
+  include SmarbsTest
+
+  def test_configsize
+    cs = ConfigSize.new("size", "", "desc1\ndesc2", "1k")
+    assert_instance_of(Size, cs.value)
+    assert_equal 1024, cs.value.b
+
+    cs.set(Size.new("1m"))
+    assert_instance_of(Size, cs.value)
+    assert_equal 1024*1024, cs.value.b
+
+    assert_equal cs.to_s, "desc1\ndesc2\nsize 1.0m"
+  end
+end
+
+class TestConfigBoolean < Test::Unit::TestCase;
+  include SmarbsTest
+
+  def test_configboolean
+    cs = ConfigBoolean.new("own", "", "desc", "YES")
+    assert_equal true, cs.value
+    assert_equal cs.to_s, "desc\nown yes"
+
+    cs.set(false)
+    assert_equal false, cs.value
+    assert_equal cs.to_s, "desc\nown no"
+
+    cs.clear
+    cs.add("yes")
+    assert_equal cs.value, true
+  end
+end
+
+class TestConfigInteger < Test::Unit::TestCase;
+  include SmarbsTest
+
+  def test_configinteger
+    cs = ConfigInteger.new("num", "", "desc", "3")
+    assert_equal 3, cs.value
+    assert_equal cs.to_s, "desc\nnum 3"
+
+    cs.set(9)
+    assert_equal 9, cs.value
+
+    assert_raise_message("Format 33.8 not valid for an integer in 'num'!") do
+      cs.set("33.8")
+    end
+
+    cs.set(-9)
+    assert_equal(-9, cs.value)
+
+    cs = ConfigInteger.new("num", "positive", "desc", "3")
+    assert_raise_message("'num' must be positive, you set it to -9!") do #TODO all this: configfile errors
+      cs.set(-9)
+    end
+  end
+end
+
+class TestConfigExclude < Test::Unit::TestCase;
+  include SmarbsTest
+
+  def test_configexclude
+    cs = ConfigExclude.new("exclude", "", "desc", ["this","that"])
+    assert_equal ["this", "that"], cs.value
+  end
+end
+
+class TestSmarbsBackupDir < Test::Unit::TestCase
+  include SmarbsTest
+
+  def setup
+    clean
+  end
+
+  def teardown
+    clean_all
+  end
+
+  def test_smarbsbackupdir
+    `mkdir /tmp/smarbs/smarbsbackup`
+    dir=SmarbsBackupDir.new("/tmp/smarbs/smarbsbackup")
+    dir.remove_except_one
+    assert_equal(dir.files, [])
+
+    `mkdir /tmp/smarbs/smarbsbackup/1023-backup.20`
+    `mkdir /tmp/smarbs/smarbsbackup/1022313-backup.2`
+    `mkdir /tmp/smarbs/smarbsbackup/1033-backup.33`
+    `mkdir /tmp/smarbs/smarbsbackup/10cc233-backup.238`
+    dir=SmarbsBackupDir.new("/tmp/smarbs/smarbsbackup")
+    dir.remove_except_one
+    assert_equal(dir.files, ["1022313-backup.2"])
+
+    clean
+    `mkdir -p /tmp/smarbs/smarbsbackup`
+    `touch /tmp/smarbs/smarbsbackup/232-backup.0`
+    assert_raise_message "File '232-backup.0' left in the destination directory /tmp/smarbs/smarbsbackup/!" do
+      SmarbsBackupDir.new("/tmp/smarbs/smarbsbackup")
+    end
+
+    clean
+    `mkdir -p /tmp/smarbs/smarbsbackup/1023-backup.20`
+    `mkdir /tmp/smarbs/smarbsbackup/10233-backup.2`
+    `touch /tmp/smarbs/smarbsbackup/2928.txt`
+    assert_raise_message "File '2928.txt' left in the destination directory /tmp/smarbs/smarbsbackup/!" do
+      SmarbsBackupDir.new("/tmp/smarbs/smarbsbackup")
+    end
+
+    clean
+    `mkdir -p /tmp/smarbs/test_directory/alpha`
+    assert_raise_message "/tmp/smarbs/test_directory/alpha has wrong format!" do
+      SmarbsBackupDir.new("/tmp/smarbs/test_directory")
+    end
+
+    `rm -r /tmp/smarbs/test_directory/alpha`
+    `mkdir -p /tmp/smarbs/test_directory/a-backup.`
+    assert_raise_message "/tmp/smarbs/test_directory/a-backup. has wrong format!" do
+      SmarbsBackupDir.new("/tmp/smarbs/test_directory")
+    end
+
+    `rm -r /tmp/smarbs/test_directory/a-backup.`
+    `mkdir -p /tmp/smarbs/test_directory/-backup.3`
+    assert_equal ["-backup.3"], SmarbsBackupDir.new("/tmp/smarbs/test_directory").files
+
+    `rm -r /tmp/smarbs/test_directory/-backup.3`
+    `mkdir -p /tmp/smarbs/test_directory/a-backup.3b2`
+    assert_raise_message "/tmp/smarbs/test_directory/a-backup.3b2 has wrong format in number!" do
+      SmarbsBackupDir.new("/tmp/smarbs/test_directory")
+    end
+    
+    `rm -r /tmp/smarbs/test_directory/a-backup.3b2`
+    `mkdir -p /tmp/smarbs/test_directory/a-backup.0`
+    assert_raise_message "\nAborted backup directory 'a-backup.0' left in /tmp/smarbs/test_directory/\nMove or delete it to continue!", NoConfigException do
+      SmarbsBackupDir.new("/tmp/smarbs/test_directory")
+    end
+
+    assert_equal "a-backup.0", SmarbsBackupDir.new("/tmp/smarbs/test_directory", true).directory_left
+
+    `rm -r /tmp/smarbs/test_directory/a-backup.0`
+    `mkdir -p /tmp/smarbs/test_directory/a-backup.2  /tmp/smarbs/test_directory/a-backup.3  /tmp/smarbs/test_directory/a-backup.6  /tmp/smarbs/test_directory/a-backup.9`
+    SmarbsBackupDir.new("/tmp/smarbs/test_directory").remove_except_one
+    assert_equal(`ls /tmp/smarbs/test_directory`, "a-backup.2\n")
+    
+    assert_equal false, SmarbsBackupDir.new("/tmp/smarbs/test_directory", true).directory_left
+
+    assert_raise_message "/etc/smarbs/ is not writable!" do
+      SmarbsBackupDir.new("/etc/smarbs")
+    end
+
+    clean
+    for i in 1..10
+      `mkdir -p /tmp/smarbs/backedup/smarbsbackup/a-backup.#{i}`
+    end
+    assert_backup_dirs([1, 2, 3, 4, 5, 6, 7, 8, 9, 10])
+    dir = SmarbsBackupDir.new("/tmp/smarbs/backedup/smarbsbackup")
+    assert_output("...removing backup.3...") {dir.delete(Log.new("", true), 0)}
+    assert_backup_dirs([1, 2, 4, 5, 6, 7, 8, 9, 10])
+
+    assert_output("...removing backup.5...") {dir.delete(Log.new("", true), 0)}
+    assert_backup_dirs([1, 2, 4, 6, 7, 8, 9, 10])
+
+    assert_output("...removing backup.6...") {dir.delete(Log.new("", true), 0)}
+    assert_backup_dirs([1, 2, 4, 7, 8, 9, 10])
+
+    assert_output("...removing backup.7...") {dir.delete(Log.new("", true), 0)}
+    assert_backup_dirs([1, 2, 4, 8, 9, 10])
+
+    dir.increment
+    assert_backup_dirs([2, 3, 5, 9, 10, 11])
+
+    assert_output("...removing backup.10...") {dir.delete(Log.new("", true), 0)}
+    assert_backup_dirs([2, 3, 5, 9, 11])
+
+    assert_output("...removing backup.11...") {dir.delete(Log.new("", true), 3)}
+    assert_backup_dirs([2, 3, 5, 9])
+
+    assert_output("...removing backup.9...") {dir.delete(Log.new("", true), 3)}
+    assert_backup_dirs([2, 3, 5])
+
+    assert_raise_message("Not enough space available, next deletion would go below your minbackuplevels of 3!") do
+      dir.delete(Log.new("", true), 3)
+    end
+    assert_backup_dirs([2, 3, 5])
+
+    dir.increment
+    assert_backup_dirs([3, 4, 6])
+
+    assert_output("...removing backup.6...") {dir.delete(Log.new("", true), 0)}
+    assert_backup_dirs([3, 4])
+
+    assert_output("...removing backup.4...") {dir.delete(Log.new("", true), 0)}
+    assert_backup_dirs([3])
+
+    dir.increment
+    assert_backup_dirs([4])
+
+    assert_raise_message("Not enough space available to do an incremental backup!") do
+      dir.delete(Log.new("", true), 0)
+    end
+    assert_backup_dirs([4])
+
+    clean
+    for i in 1..10
+      `mkdir -p /tmp/smarbs/backedup/smarbsbackup/a-backup.#{i}`
+    end
+    assert_backup_dirs([1, 2, 3, 4, 5, 6, 7, 8, 9, 10])
+    dir = SmarbsBackupDir.new("/tmp/smarbs/backedup/smarbsbackup")
+    assert_output("...removing backup.10...") {dir.delete(Log.new("", true), 0, true)}
+    assert_backup_dirs([1, 2, 3, 4, 5, 6, 7, 8, 9])
+
+    assert_output("...removing backup.9...") {dir.delete(Log.new("", true), 0, true)}
+    assert_backup_dirs([1, 2, 3, 4, 5, 6, 7, 8])
+
+    assert_output("...removing backup.8...") {dir.delete(Log.new("", true), 0, true)}
+    assert_backup_dirs([1, 2, 3, 4, 5, 6, 7])
+  end
+end
+
+class TestConfigTemplate < Test::Unit::TestCase
+  include SmarbsTest
+
+  def setup
+    clean
+  end
+
+  def teardown
+    clean_all
+  end
+
+  def test_config_template
+    t = ConfigTemplate.new
+    assert_raise_message "Order still empty!", InternalError do
+      t.parse_section("src: String\n -- Description1\n -- Description 2\nsrc the_source")
+    end
+    t.parse_section("=preferences=")
+    assert_equal "----------------------------------preferences-----------------------------------\n\n", t.to_s
+
+    t.parse_section("src: String\n -- Description1\n -- Description 2\n -- src test\nsrc the_source")
+    assert_kind_of String, src = t.src
+    assert_equal "the_source", src
+    assert_equal "----------------------------------preferences-----------------------------------
+
+ -- Description1
+ -- Description 2
+ -- src test
+src the_source\n\n", t.to_s
+
+    t.src = "the_other_source"
+    t.parse_section("i: Integer(positive)\ni 9")
+    assert_raise_message "'i' must be positive, you set it to -3!" do
+      t.i = -3
+    end
+    
+    t.parse_section("=advanced=")
+    t.parse_section("a: Size(list)\n -- desc\na 1m\na 2m")
+
+    assert_equal \
+      "----------------------------------preferences-----------------------------------
+
+ -- Description1
+ -- Description 2
+ -- src test
+src the_other_source
+
+
+i 9
+
+------------------------------------advanced------------------------------------
+
+ -- desc
+a 1.0m
+a 2.0m
+
+", t.to_s
+
+    assert_raise NoMethodError do
+      t.not_existing=3
+    end
+    assert_raise NoMethodError do
+      t.not_existing
+    end
+
+    u = ConfigTemplate.new
+
+    `echo '=preferences=
+
+src: String
+ -- Description1
+ -- Description 2
+ -- src test
+src the_other_source
+
+i: Integer(positive)
+i 9
+
+=advanced=
+
+a: Size(list)
+ -- desc
+a 1m
+a 2m
+
+' > /tmp/smarbs/configuration.txt`
+
+    u.read_template("/tmp/smarbs/configuration.txt")
+    assert_equal t.to_s, u.to_s
+
+    text = "
+i 10
+a  18m
+
+-- a 19m
+a 20m
+ -- j afug
+
+-- comment
+    "
+    u.parse(text)
+    assert_equal 10, u.i
+    assert_equal [Size.new("18m"),Size.new("20m")], u.a
+    assert_equal "the_other_source", u.src
+
+    assert_raise_message "Only one 'i' allowed!" do
+      u.parse("i 10
+a 18m
+i 11")
+    end
+
+    assert_raise_message "No option 'j' existing!" do
+      u.parse("src aaa
+a 18m
+j 11")
+    end
+
+    v = ConfigTemplate.new
+    r = ConfigTemplate.new
+    v.read_template("/tmp/smarbs/configuration.txt")
+    r.read_template("/tmp/smarbs/configuration.txt")
+    r.parse(text)
+    v.parse(text.split("\n"))
+
+    assert_equal r.to_s, v.to_s
+  end
+end
+
+class TestConfigFile < Test::Unit::TestCase
+  include SmarbsTest
+
+  def setup
+    clean
+  end
+
+  def teardown
+    clean_all
+  end
+
+  def test_config_file
+    `echo "=preferences=
+
+src: Directory(list)
+ -- One or more directories to the source (= directory or file you need a backup
+ -- backup from. One directory / file per line only.
+src /directory/to/source1
+src /directory/to/source2
+
+dest: Directory
+ -- One (!) destination directory:
+dest /directory/to/the/destination
+
+limit: Size
+ -- Limit of space to use for the full and all the incremental backups:
+ -- (ignored when using "ownpartition", see below)
+limit 20m
+
+=advanced=
+
+execute_before: String
+ -- A command to execute (in a shell) before the backup is done.
+ -- Example:
+ -- execute_before mount /directory/to/source1
+execute_before" > /tmp/smarbs/configuration.txt`
+
+    assert_raise_message("/etc is not writable!") do
+      ConfigFile.new("/etc/configfile")
+    end
+
+    assert_raise_message("/etc/fstab~ is not writable!") do
+      ConfigFile.new("/etc/fstab~")
+    end
+
+    cf = nil
+    assert_output("First run:\nConfig file created, edit /tmp/smarbs/smarbs/backup1") do
+      cf = ConfigFile.new("/tmp/smarbs/smarbs/backup1")
+    end
+
+    assert_equal "Smarbs space-managing-rsync-backup-script 0.9.1 (4. September 2009)\nrsync and ruby are required!\n\nFor each different backup you should create a file like this in the directory\n/home/\"user\"/.smarbs/ (or /etc/smarbs/ if you are root).\n\nYou can start a backup using \"smarbs backup1\" or \"smarbs homebackup\" assuming\nthere is a file named \"backup1\" or \"homebackup\" in the smarbs folder.\nA simple \"smarbs\" or a \"smarbs all\" will do a backup with all the different\nconfigurations in the smarbs directory.\n\nSizes:    2394 Bytes     (B) =>  2394\n          32 Kibibytes (MiB) =>  32k\n          54 Mebibytes (MiB) =>  54m\n          2  Gibibytes (KiB) =>  2g\n\n", cf.intro
+
+    assert_equal "-------------------------------end of preferences-------------------------------\n\nThis program is free software: you can redistribute it and/or modify\nit under the terms of the GNU General Public License as published by\nthe Free Software Foundation, either version 3 of the License, or\n(at your option) any later version.\n\nThis program is distributed in the hope that it will be useful,\nbut WITHOUT ANY WARRANTY; without even the implied warranty of\nMERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\nGNU General Public License for more details.\n\nSee <http://www.gnu.org/licenses/> for a copy of the GNU General Public License.\n\nFor any suggestions, comments or bug reports, write to rggjan@gmail.com", cf.outro
+    assert_equal "backup1", cf.filename
+
+    assert_equal ["/directory/to/source1","/directory/to/source2"], cf.src
+    cf.src = ["/directory/to/other_source"]
+    assert_equal ["/directory/to/other_source"], cf.src
+    cf.write
+    cf.read
+    assert_equal ["/directory/to/other_source"], cf.src
+
+    assert_output("", :exact) do
+      cf = ConfigFile.new("/tmp/smarbs/smarbs/backup1")
+    end
+    assert_equal ["/directory/to/other_source"], cf.src
+    `echo "abc
+-preferences-
+def
+ghi
+advanced preferences-
+jkl" > /tmp/smarbs/smarbs/backup1`
+
+    assert_raise_message("Configfile /tmp/smarbs/smarbs/backup1 is invalid. Please delete it!") do
+      ConfigFile.new("/tmp/smarbs/smarbs/backup1")
+    end
+  end
+end