commit f125d194e8603b12a108d302ac663bea9f54df76 · pyrox.dev/nixpkgs

+17
nixos/tests/ec2.nix
···

       13
       13
        
               ../../nixos/modules/testing/test-instrumentation.nix

     

       14
       14
        
               { boot.initrd.kernelModules = [ "virtio" "virtio_blk" "virtio_pci" "virtio_ring" ];

     

       15
       15
        
                 ec2.hvm = true;

     

       16
       16
       +
       

     

       17
       17
       +
                 # Hack to make the partition resizing work in QEMU.

     

       18
       18
       +
                 boot.initrd.postDeviceCommands = mkBefore

     

       19
       19
       +
                   ''

     

       20
       20
       +
                     ln -s vda /dev/xvda

     

       21
       21
       +
                     ln -s vda1 /dev/xvda1

     

       22
       22
       +
                   '';

     

       16
       23
        
               }

     

       17
       24
        
             ];

     

       18
       25
        
           }).config.system.build.amazonImage;

     
···

       40
       47
        
                 mkdir $imageDir, 0700;

     

       41
       48
        
                 my $diskImage = "$imageDir/machine.qcow2";

     

       42
       49
        
                 system("qemu-img create -f qcow2 -o backing_file=${image}/nixos.img $diskImage") == 0 or die;

     

       50
       50
       +
                 system("qemu-img resize $diskImage 10G") == 0 or die;

     

       43
       51
        
       

     

       44
       52
        
                 # Note: we use net=169.0.0.0/8 rather than

     

       45
       53
        
                 # net=169.254.0.0/16 to prevent dhcpcd from getting horribly

     
···

       100
       108
        
             $machine->succeed("echo localhost,127.0.0.1 ${snakeOilPublicKey} > ~/.ssh/known_hosts");

     

       101
       109
        
             $machine->succeed("ssh -o BatchMode=yes localhost exit");

     

       102
       110
        
       

     

       111
       111
       +
             # Test whether the root disk was resized.

     

       112
       112
       +
             my $blocks = $machine->succeed("stat -c %b -f /");

     

       113
       113
       +
             my $bsize = $machine->succeed("stat -c %S -f /");

     

       114
       114
       +
             my $size = $blocks * $bsize;

     

       115
       115
       +
             die "wrong free space $size" if $size < 9.7 * 1024 * 1024 * 1024 || $size > 10 * 1024 * 1024 * 1024;

     

       116
       116
       +
       

     

       117
       117
       +
             # Just to make sure resizing is idempotent.

     

       103
       118
        
             $machine->shutdown;

     

       119
       119
       +
             $machine->start;

     

       120
       120
       +
             $machine->waitForFile("/root/user-data");

     

       104
       121
        
           '';

     

       105
       122
        
         };

     

       106
       123