Class: Veewee::Session

Inherits:
Object
  • Object
show all
Defined in:
lib/veewee/session.rb

Instance Attribute Summary collapse

Class Method Summary collapse

Instance Attribute Details

#definition ⇒ Object

Returns the value of attribute definition.



19
20
21
 
# File 'lib/veewee/session.rb', line 19

def definition
  @definition
end

#definition_dir ⇒ Object

Returns the value of attribute definition_dir.



15
16
17
 
# File 'lib/veewee/session.rb', line 15

def definition_dir
  @definition_dir
end

#iso_dir ⇒ Object

Returns the value of attribute iso_dir.



17
18
19
 
# File 'lib/veewee/session.rb', line 17

def iso_dir
  @iso_dir
end

#name ⇒ Object

Returns the value of attribute name.



18
19
20
 
# File 'lib/veewee/session.rb', line 18

def name
  @name
end

#template_dir ⇒ Object

Returns the value of attribute template_dir.



16
17
18
 
# File 'lib/veewee/session.rb', line 16

def template_dir
  @template_dir
end

#veewee_dir ⇒ Object

Returns the value of attribute veewee_dir.



14
15
16
 
# File 'lib/veewee/session.rb', line 14

def veewee_dir
  @veewee_dir
end

Class Method Details

.add_ide_controller(boxname) ⇒ Object 



491
492
493
494
495
 
# File 'lib/veewee/session.rb', line 491

def self.add_ide_controller(boxname)
 #unless => "${vboxcmd} showvminfo '${vname}' | grep 'IDE Controller' "
 command ="#{@vboxcmd} storagectl '#{boxname}' --name 'IDE Controller' --add ide"
  Veewee::Shell.execute("#{command}")
end

.add_sata_controller(boxname) ⇒ Object 



497
498
499
500
501
 
# File 'lib/veewee/session.rb', line 497

def self.add_sata_controller(boxname)
  #unless => "${vboxcmd} showvminfo '${vname}' | grep 'SATA Controller' ";
  command ="#{@vboxcmd} storagectl '#{boxname}' --name 'SATA Controller' --add sata"
  Veewee::Shell.execute("#{command}")
end

.add_ssh_nat_mapping(boxname) ⇒ Object 



327
328
329
330
331
332
333
334
335
336
337
338
 
# File 'lib/veewee/session.rb', line 327

def self.add_ssh_nat_mapping(boxname)
  vm=VirtualBox::VM.find(boxname)
  #Map SSH Ports
  #			command => "${vboxcmd} modifyvm '${vname}' --natpf1 'guestssh,tcp,,${hostsshport},,${guestsshport}'",
  port = VirtualBox::NATForwardedPort.new
  port.name = "guestssh"
  port.guestport = @definition[:ssh_guest_port].to_i
  port.hostport = @definition[:ssh_host_port].to_i
  vm.network_adapters[0].nat_driver.forwarded_ports << port
  port.save
  vm.save  
end

.attach_disk(boxname) ⇒ Object 



504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
 
# File 'lib/veewee/session.rb', line 504

def self.attach_disk(boxname)
  location=boxname+"."+@definition[:disk_format].downcase
  
  command="VBoxManage  list  systemproperties|grep '^Default machine'|cut -d ':' -f 2|sed -e 's/^[ ]*//'"
  results=IO.popen("#{command}")
  place=results.gets.chop
  results.close

  location="#{place}/#{boxname}/"+location
  puts "Attaching disk: #{location}"
  
  #command => "${vboxcmd} storageattach '${vname}' --storagectl 'SATA Controller' --port 0 --device 0 --type hdd --medium '${vname}.vdi'",
  command ="#{@vboxcmd} storageattach '#{boxname}' --storagectl 'SATA Controller' --port 0 --device 0 --type hdd --medium '#{location}'"
  Veewee::Shell.execute("#{command}")

end

.build(boxname, options) ⇒ Object 



198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
 
# File 'lib/veewee/session.rb', line 198

def self.build(boxname,options)
  
    options = {  "force" => false, "format" => "vagrant", "nogui" => false }.merge(options)
  
    #Now we have to load the definition (reads definition.rb)
    load_definition(boxname)

    #Command to execute locally
    @vboxcmd=determine_vboxcmd
    
    ssh_options={ :user => @definition[:ssh_user], :port => @definition[:ssh_host_port], :password => @definition[:ssh_password],
      :timeout => @definition[:ssh_timeout]}       
    
    #Suppress those annoying virtualbox messages
    suppress_messages  
    
    verify_iso(@definition[:iso_file])
    
    if (options["force"]==false)
    else    
      puts "Forcing build by destroying #{boxname} machine"
      destroy_vm(boxname)
    end
    
    checksums=calculate_checksums(@definition,boxname)
    
    transaction(boxname,"0-initial-#{checksums[0]}",checksums) do
    
        #Create the Virtualmachine and set all the memory and other stuff
        create_vm(boxname)
  
        #Create a disk with the same name as the boxname
        create_disk(boxname)
      
         
        #These command actually call the commandline of Virtualbox, I hope to use the virtualbox-ruby library in the future
        add_ide_controller(boxname)
        add_sata_controller(boxname)
        attach_disk(boxname)
        mount_isofile(boxname,@definition[:iso_file])
        add_ssh_nat_mapping(boxname)

        #Starting machine

        if (options["nogui"]==true)
          start_vm(boxname,"vrdp")
        else
          start_vm(boxname,"gui")
        end
        
        #waiting for it to boot
        puts "Waiting for the machine to boot"
        sleep @definition[:boot_wait].to_i
    
        Veewee::Scancode.send_sequence("#{@vboxcmd}","#{boxname}",@definition[:boot_cmd_sequence])
    
        puts "Starting a webserver on port #{@definition[:kickstart_port]}"
        #:kickstart_port => "7122", :kickstart_ip => self.local_ip, :kickstart_timeout => 1000,:kickstart_file => "preseed.cfg",
        Veewee::Web.wait_for_request(@definition[:kickstart_file],{:port => @definition[:kickstart_port],
                                  :host => @definition[:kickstart_ip], :timeout => @definition[:kickstart_timeout],
                                  :web_dir => File.join(@definition_dir,boxname)})
                                  
        Veewee::Ssh.("localhost",ssh_options) do
          #Transfer version of Virtualbox to $HOME/.vbox_version            
          versionfile=Tempfile.open("vbox.version")
          versionfile.puts "#{VirtualBox::Global.global.lib.virtualbox.version}"
          versionfile.rewind
          Veewee::Ssh.transfer_file("localhost",versionfile.path,".vbox_version", ssh_options)
          puts ""
          versionfile.close
          versionfile.delete
        end
    end #initial Transaction
 
             
           counter=1
           @definition[:postinstall_files].each do |postinstall_file|
 
             
             filename=File.join(@definition_dir,boxname,postinstall_file)   
  
             transaction(boxname,"#{counter}-#{postinstall_file}-#{checksums[counter]}",checksums) do
               
               Veewee::Ssh.("localhost",ssh_options) do
 
                Veewee::Ssh.transfer_file("localhost",filename,ssh_options)
                command=@definition[:sudo_cmd]
                command.gsub!(/%p/,"#{@definition[:ssh_password]}")
                command.gsub!(/%u/,"#{@definition[:ssh_user]}")
                command.gsub!(/%f/,"#{postinstall_file}")

                Veewee::Ssh.execute("localhost","#{command}",ssh_options)
                end
                
             end
             counter+=1
             
           end  
 
    
end

.calculate_checksums(definition, boxname) ⇒ Object 



563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
 
# File 'lib/veewee/session.rb', line 563

def self.calculate_checksums(definition,boxname)

  #TODO: get rid of definitiondir and so one
  initial=definition.clone

  keys=[:postinstall_files,:sudo_cmd,:postinstall_timeout]
  keys.each do |key|
    initial.delete(key)
  end

  checksums=Array.new
  checksums << Digest::MD5.hexdigest(initial.to_s)

  postinstall_files=definition[:postinstall_files]
  unless postinstall_files.nil?
    for filename in postinstall_files
      begin
      full_filename=File.join(@definition_dir,boxname,filename)   

      checksums << Digest::MD5.hexdigest(File.read(full_filename))
      rescue
        puts "Error reading postinstall file #{filename} - checksum"
        exit
      end
    end
  end

  return checksums

end

.clean ⇒ Object 



142
143
144
 
# File 'lib/veewee/session.rb', line 142

def self.clean
    puts "Not yet implemented"
end

.create_disk(boxname) ⇒ Object 



453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
 
# File 'lib/veewee/session.rb', line 453

def self.create_disk(boxname)
  #Now check the disks
  #Maybe one day we can use the name, now we have to check location
  #disk=VirtualBox::HardDrive.find(boxname)
  location=boxname+"."+@definition[:disk_format].downcase
  
  found=false       
  VirtualBox::HardDrive.all.each do |d|
    if !d.location.match(/#{location}/).nil?
      found=true
      break
    end
  end   

  if !found
    puts "Creating new harddrive of size #{@definition[:disk_size].to_i} "
    
    #newdisk=VirtualBox::HardDrive.new
    #newdisk.format=@definition[:disk_format]
    #newdisk.logical_size=@definition[:disk_size].to_i

    #newdisk.location=location
    ##PDB: again problems with the virtualbox GEM
   ##VirtualBox::Global.global.max_vdi_size=1000000
    #newdisk.save
    
    command="VBoxManage  list  systemproperties|grep '^Default machine'|cut -d ':' -f 2|sed -e 's/^[ ]*//'"
    results=IO.popen("#{command}")
    place=results.gets.chop
    results.close
     
    command ="#{@vboxcmd} createhd --filename '#{place}/#{boxname}/#{boxname}.#{@definition[:disk_format]}' --size '#{@definition[:disk_size].to_i}' --format #{@definition[:disk_format]} > /dev/null"
    Veewee::Shell.execute("#{command}")
               
  end
  
end

.create_vm(boxname, force = false) ⇒ Object 



391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
 
# File 'lib/veewee/session.rb', line 391

def self.create_vm(boxname,force=false)

  #Verifying the os.id with the :os_type_id specified
  matchfound=false
  VirtualBox::Global.global.lib.virtualbox.guest_os_types.collect { |os|
    if @definition[:os_type_id] == os.id
      matchfound=true
    end
  }
  unless matchfound
    puts "The ostype: #{@definition[:os_type_id]} is not available in your Virtualbox version"
    exit
  end


  vm=VirtualBox::VM.find(boxname)

  if (!vm.nil? && !(vm.powered_off?))
      puts "shutting down box"
      #We force it here, maybe vm.shutdown is cleaner
      vm.stop
  end     

  if !vm.nil? 
    puts "Box already exists"
    #vm.stop
    #vm.destroy
  else
    #TODO One day ruby-virtualbox will be able to handle this creation
    #Box does not exist, we can start to create it

    command="#{@vboxcmd} createvm --name '#{boxname}' --ostype '#{@definition[:os_type_id]}' --register"    

    #Exec and system stop the execution here
    Veewee::Shell.execute("#{command}")
    
  end

  vm=VirtualBox::VM.find(boxname)
  if vm.nil?
    puts "we tried to create a box or a box was here before"
    puts "but now it's gone"
    exit
  end
  
  #Set all params we know 
  vm.memory_size=@definition[:memory_size].to_i
  vm.os_type_id=@definition[:os_type_id]
  vm.cpu_count=@definition[:cpu_count].to_i
  vm.name=boxname

  puts "Creating vm #{vm.name} : #{vm.memory_size}M - #{vm.cpu_count} CPU - #{vm.os_type_id}"
  #setting bootorder 
  vm.boot_order[0]=:hard_disk
  vm.boot_order[1]=:dvd
  vm.boot_order[2]=:null
  vm.boot_order[3]=:null
  vm.validate
  vm.save
  
end

.declare(options) ⇒ Object 



30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
 
# File 'lib/veewee/session.rb', line 30

def self.declare(options)
  defaults={
    :cpu_count => '1', :memory_size=> '256', 
    :disk_size => '10140', :disk_format => 'VDI',:disk_size => '10240' ,
    :os_type_id => 'Ubuntu',
    :iso_file => "ubuntu-10.10-server-i386.iso", :iso_src => "", :iso_md5 => "", :iso_download_timeout => 1000,
    :boot_wait => "10", :boot_cmd_sequence => [ "boot"],
    :kickstart_port => "7122", :kickstart_ip => self.local_ip, :kickstart_timeout => 10000,:kickstart_file => "preseed.cfg",
    :ssh_login_timeout => "100",:ssh_user => "vagrant", :ssh_password => "vagrant",:ssh_key => "",
    :ssh_host_port => "2222", :ssh_guest_port => "22",
    :sudo_cmd => "echo '%p'|sudo -S sh '%f'",
    :shutdown_cmd => "shutdown -H",
    :postinstall_files => [ "postinstall.sh"],:postinstall_timeout => 10000}
    
    @definition=defaults.merge(options)
 
end

.define(boxname, template_name, options = {}) ⇒ Object 



48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
 
# File 'lib/veewee/session.rb', line 48

def self.define(boxname,template_name,options = {})
  #Check if template_name exists
  
  options = {  "force" => false, "format" => "vagrant" }.merge(options)
  
  if File.directory?(File.join(@template_dir,template_name))
  else
    puts "This template can not be found, use vagrant basebox templates to list all templates"
    exit
  end
  if !File.exists?(@definition_dir)
    FileUtils.mkdir(@definition_dir)
  end
  
  if File.directory?(File.join(@definition_dir,boxname))
    if !options["force"]
      puts "The definition for #{boxname} already exists. Use --force to overwrite"
      exit
    end
  else
    FileUtils.mkdir(File.join(@definition_dir,boxname))
  end
  FileUtils.cp_r(File.join(@template_dir,template_name,'.'),File.join(@definition_dir,boxname))
  puts "The basebox '#{boxname}' has been succesfully created from the template ''#{template_name}'"
  puts "You can now edit the definition files stored in definitions/#{boxname}"
  puts "or build the box with:"
  if (options["format"]=='vagrant') 
     puts "vagrant basebox build '#{boxname}'"
   end
   if (options["format"]=='veewee')
     puts "veewee  build '#{boxname}'"
   end
  
end

.definition_exists?(boxname) ⇒ Boolean

Returns:

  • (Boolean) 


86
87
88
89
90
91
92
93
94
95
96
97
 
# File 'lib/veewee/session.rb', line 86

def self.definition_exists?(boxname)
  if File.directory?(File.join(@definition_dir,boxname))
    if File.exists?(File.join(@definition_dir,boxname,'definition.rb'))
      return true
    else
       return false
    end
  else
    return false
  end
          
end

.destroy_vm(boxname) ⇒ Object 



340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
 
# File 'lib/veewee/session.rb', line 340

def self.destroy_vm(boxname)
  
  load_definition(boxname)
        
  #:destroy_medium => :delete,  will delete machine + all media attachments
  #vm.destroy(:destroy_medium => :delete)
  ##vm.destroy(:destroy_image => true)
  
  #VBoxManage unregistervm "test-machine" --delete
  #because the destroy does remove the .vbox file on 4.0.x
  #PDB
  #vm.destroy()
  
  
  
  vm=VirtualBox::VM.find(boxname)

  if (!vm.nil? && !(vm.powered_off?))
      puts "Shutting down vm #{boxname}"
      #We force it here, maybe vm.shutdown is cleaner
      vm.stop
  end     
  sleep 3
  
  command="#{@vboxcmd} unregistervm  '#{boxname}' --delete"    

  puts "Deleting vm #{boxname}"
  
  #Exec and system stop the execution here
  Veewee::Shell.execute("#{command}")
  sleep 1
  
  #if the disk was not attached when the machine was destroyed we also need to delete the disk
  location=boxname+"."+@definition[:disk_format].downcase
  found=false       
  VirtualBox::HardDrive.all.each do |d|
    if !d.location.match(/#{location}/).nil?

      command="#{@vboxcmd} closemedium disk '#{d.location}' --delete"
      puts "Deleting disk #{d.location}"
      Veewee::Shell.execute("#{command}")          
      #v.3
      #d.destroy(true)
      break
    end
  end     
  
  
  
end

.determine_vboxcmd ⇒ Object 



301
302
303
 
# File 'lib/veewee/session.rb', line 301

def self.determine_vboxcmd
  return "VBoxManage"
end

.download_progress(url, localfile) ⇒ Object 



594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
 
# File 'lib/veewee/session.rb', line 594

def self.download_progress(url,localfile)
  pbar = nil
  URI.parse(url).open(
      :content_length_proc => lambda {|t|
        if t && 0 < t
          pbar = ProgressBar.new("Fetching file", t)
          pbar.file_transfer_mode
        end
      },
      :progress_proc => lambda {|s|
        pbar.set s if pbar
      }) { |src|
        open("#{localfile}","wb") { |dst|
          dst.write(src.read)
        }
      }
   
end

.export_box(boxname) ⇒ Object 



183
184
185
186
187
188
189
190
191
192
 
# File 'lib/veewee/session.rb', line 183

def self.export_box(boxname)
  #Now we have to load the definition (reads definition.rb)
  load_definition(boxname)
  
  Veewee::Export.vagrant(boxname,@box_dir,@definition)
  #vagrant removes the mapping
  #we need to restore it in order to be able to login again
  add_ssh_nat_mapping(boxname)
  
end

.list_boxes ⇒ Object 



130
131
132
 
# File 'lib/veewee/session.rb', line 130

def self.list_boxes
    puts "Not yet implemented"
end

.list_definitions ⇒ Object 



134
135
136
137
138
139
140
 
# File 'lib/veewee/session.rb', line 134

def self.list_definitions
    puts "The following defined baseboxes exist:"
    subdirs=Dir.glob("#{@definition_dir}/*")
    subdirs.each do |sub|
      puts "- "+File.basename(sub)
    end
end

.list_ostypes ⇒ Object 



554
555
556
557
558
559
560
 
# File 'lib/veewee/session.rb', line 554

def self.list_ostypes
  puts
  puts "Available os types:"
  VirtualBox::Global.global.lib.virtualbox.guest_os_types.collect { |os|
    puts "#{os.id}: #{os.description}"
  }      
end

.list_templates(options = { :format => 'vagrant'}) ⇒ Object 



111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
 
# File 'lib/veewee/session.rb', line 111

def self.list_templates( options = { :format => 'vagrant'})
  puts "The following templates are available:"
  subdirs=Dir.glob("#{@template_dir}/*")
  subdirs.each do |sub|
    if File.directory?("#{sub}")
      definition=Dir.glob("#{sub}/definition.rb")
      if definition.length!=0
        name=sub.sub(/#{@template_dir}\//,'')
        if (options[:format]=='vagrant') 
          puts "vagrant basebox define '<boxname>' '#{name}'"
        end
        if (options[:format]=='veewee')
          puts "veewee define '<boxname>' '#{name}'"
        end
      end
    end
  end
end

.load_definition(boxname) ⇒ Object 



310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
 
# File 'lib/veewee/session.rb', line 310

def self.load_definition(boxname)

  if definition_exists?(boxname)
   definition_file=File.join(@definition_dir,boxname,"definition.rb")
   begin
     require definition_file
   rescue LoadError
     puts "Error loading definition of #{boxname}"
     exit
   end  
  else
    puts "Error: definition for basebox '#{boxname}' does not exist."
    list_definitions
    exit
 end
end

.local_ip ⇒ Object 



543
544
545
546
547
548
549
550
551
552
 
# File 'lib/veewee/session.rb', line 543

def self.local_ip
  orig, Socket.do_not_reverse_lookup = Socket.do_not_reverse_lookup, true  # turn off reverse DNS resolution temporarily

  UDPSocket.open do |s|
    s.connect '64.233.187.99', 1
    s.addr.last
  end
ensure
  Socket.do_not_reverse_lookup = orig
end

.mount_isofile(boxname, isofile) ⇒ Object 



521
522
523
524
525
526
527
 
# File 'lib/veewee/session.rb', line 521

def self.mount_isofile(boxname,isofile)
  full_iso_file=File.join(@iso_dir,isofile)
  puts "Mounting cdrom: #{full_iso_file}"
  #command => "${vboxcmd} storageattach '${vname}' --storagectl 'IDE Controller' --type dvddrive --port 1 --device 0 --medium '${isodst}' ";
  command ="#{@vboxcmd} storageattach '#{boxname}' --storagectl 'IDE Controller' --type dvddrive --port 1 --device 0 --medium '#{full_iso_file}'"
 Veewee::Shell.execute("#{command}")
end

.remove_box(boxname) ⇒ Object 



194
195
196
 
# File 'lib/veewee/session.rb', line 194

def self.remove_box(boxname)
    puts "Not yet implemented"
end

.setenv(env) ⇒ Object 



21
22
23
24
25
26
27
28
 
# File 'lib/veewee/session.rb', line 21

def self.setenv(env)
  @veewee_dir=env[:veewee_dir]
  @definition_dir=env[:definition_dir]
  @template_dir=env[:template_dir]
  @box_dir=env[:box_dir]
  @iso_dir=env[:iso_dir]
  @tmp_dir=env[:tmp_dir]
end

.start_vm(boxname, mode) ⇒ Object 



305
306
307
308
 
# File 'lib/veewee/session.rb', line 305

def self.start_vm(boxname,mode)
      vm=VirtualBox::VM.find(boxname)
      vm.start(mode)
end

.suppress_messages ⇒ Object 



531
532
533
534
535
536
537
538
539
540
541
 
# File 'lib/veewee/session.rb', line 531

def self.suppress_messages
  #Setting this annoying messages to register
  VirtualBox::ExtraData.global["GUI/RegistrationData"]="triesLeft=0"
  VirtualBox::ExtraData.global["GUI/UpdateDate"]="1 d, 2009-09-20"
  VirtualBox::ExtraData.global["GUI/SuppressMessages"]="confirmInputCapture,remindAboutAutoCapture,remindAboutMouseIntegrationOff"
  VirtualBox::ExtraData.global["GUI/UpdateCheckCount"]="60"
  update_date=Time.now+86400
  VirtualBox::ExtraData.global["GUI/UpdateDate"]="1 d, #{update_date.year}-#{update_date.month}-#{update_date.day}, stable"
  
  VirtualBox::ExtraData.global.save
end

.transaction(boxname, step_name, checksums, &block) ⇒ Object 



613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
 
# File 'lib/veewee/session.rb', line 613

def self.transaction(boxname,step_name,checksums,&block)

  current_step_nr=step_name.split("-")[0].to_i

  vm=VirtualBox::VM.find(boxname)  
  snapnames=Array.new

  #If vm exists , look for snapshots
  if !vm.nil?
    start_snapshot=vm.root_snapshot
    snapshot=start_snapshot
    counter=0

    while (snapshot!=nil)
  	  #puts "#{counter}:#{snapshot.name}"
   	  snapnames[counter]=snapshot.name
      counter=counter+1  
      snapshot=snapshot.children[0]
    end 
  end

  #find the last snapshot matching the state
  counter=[snapnames.length, checksums.length].min-1
  last_good_state=counter
  for c in 0..counter do
      #puts "#{c}- #{snapnames[c]} - #{checksums[c]}"
      if !snapnames[c].match("#{c}.*-#{checksums[c]}")
#        puts "we found a bad state"
        last_good_state=c-1
        break
      end  
  end
  #puts "Last good state: #{last_good_state}"

  if (current_step_nr < last_good_state)
      #puts "fast forwarding #{step_name}"
      return
  end

  #puts "Current step: #{current_step_nr}"
  if (current_step_nr == last_good_state)
      if vm.running?
        vm.stop
      end

      #invalidate later snapshots
      #puts "remove old snapshots"

      for s in (last_good_state+1)..(snapnames.length-1)
        puts "Removing step [#{s}] snapshot as it is no more valid"
        snapshot=vm.find_snapshot(snapnames[s])
        snapshot.destroy
        #puts snapshot
      end

      vm.reload
      puts "Loading step #{current_step_nr} snapshots as it has not changed"
      sleep 2
      goodsnap=vm.find_snapshot(snapnames[last_good_state])
      goodsnap.restore
      sleep 2
      #TODO:Restore snapshot!!!
      vm.start
      sleep 2
      puts "Starting machine"
  end

  #puts "last good state #{last_good_state}"

  
  if (current_step_nr > last_good_state)

    if (last_good_state==-1)
      #no initial snapshot is found, clean machine!
      vm=VirtualBox::VM.find(boxname) 
 
      if !vm.nil?
        if vm.running?
          puts "Stopping machine"
          vm.stop
          while vm.running?
            sleep 1
          end
        end
        
        #detaching cdroms (used to work in 3.x)
#              vm.medium_attachments.each do |m|
#                if m.type==:dvd
#                  #puts "Detaching dvd"
#                  m.detach
#                end
#              end
        
        vm.reload
        puts "We found no good state so we are destroying the previous machine+disks"
        destroy_vm(boxname)
      end
        
    end

    #puts "(re-)executing step #{step_name}"
    
   
    yield
 
    #Need to look it up again because if it was an initial load
    vm=VirtualBox::VM.find(boxname) 
    puts "Step [#{current_step_nr}] was succesfull - saving state"
    vm.save_state
    sleep 2 #waiting for it to be ok
    #puts "about to snapshot #{vm}"
    #take snapshot after succesful execution
    vm.take_snapshot(step_name,"snapshot taken by veewee")
    sleep 2 #waiting for it to be started again
    vm.start
  end   

  #pp snapnames
end

.undefine(boxname) ⇒ Object 



99
100
101
102
103
104
105
106
107
108
109
 
# File 'lib/veewee/session.rb', line 99

def self.undefine(boxname)
  name_dir=File.join(@definition_dir,boxname)
  if File.directory?(name_dir)
    #TODO: Needs to be more defensive!!
    puts "Removing definition #{boxname}"
    FileUtils.rm_rf(name_dir)
  else
    puts "Can not undefine , definition #{boxname} does not exist"
    exit
  end
end

.verify_iso(filename, autodownload = false) ⇒ Object 



146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
 
# File 'lib/veewee/session.rb', line 146

def self.verify_iso(filename,autodownload = false)
  if File.exists?(File.join(@iso_dir,filename))
    puts 
    puts "Verifying the isofile #{filename} is ok."
  else
    full_path=File.join(@iso_dir,filename)
    path1=Pathname.new(full_path)
    path2=Pathname.new(Dir.pwd)
    rel_path=path1.relative_path_from(path2).to_s
    
    puts
    puts "The isofile is not found. The definition provided the following information:"
    puts "- Download url: #{@definition[:iso_src]}"
    puts "- Md5 Checksum: #{@definition[:iso_md5]}"
    puts ""
    
    question=ask("Download? (Yes/No)") {|q| q.default="No"}
    if question.downcase == "yes"
      if !File.exists?(@iso_dir)
        puts "Creating an iso directory"
        FileUtils.mkdir(@iso_dir)
      end
      
      download_progress(@definition[:iso_src],full_path)
    else
      puts "You have choosen for manual download: "
      puts "curl -C - -L '#{@definition[:iso_src]}' -o '#{rel_path}'"
      puts "md5 '#{rel_path}' "
      puts 
      exit
    end
    
  
  end
  
end