···

       
167
       
 
       
# Takes the name of the unit as an argument and returns a bool whether the unit is active or not.

     

       
168
       
 
       
sub unit_is_active {

     

       
169
       
 
       
    my ($unit_name) = @_;

     

       
170
       
-
       
    my $units = busctl_call_systemd1_mgr("ListUnitsByNames", "as", 1, $unit_name)->{data}->[0];

     

       
171
       
 
       
    if (scalar(@{$units}) == 0) {

     

       
172
       
 
       
        return 0;

     

       
173
       
 
       
    }

     

···

       
167
       
 
       
# Takes the name of the unit as an argument and returns a bool whether the unit is active or not.

     

       
168
       
 
       
sub unit_is_active {

     

       
169
       
 
       
    my ($unit_name) = @_;

     

       
170
       
+
       
    my $units = busctl_call_systemd1_mgr("ListUnitsByNames", "as", 1, , "--", $unit_name)->{data}->[0];

     

       
171
       
 
       
    if (scalar(@{$units}) == 0) {

     

       
172
       
 
       
        return 0;

     

       
173
       
 
       
    }

     

···

       
214
       
 
       
          systemd.services."escaped\\x2ddash".serviceConfig.X-Test = "test";

     

       
215
       
 
       
        };

     

       
216
       
 
       


     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
217
       
 
       
        unitWithRequirement.configuration = {

     

       
218
       
 
       
          systemd.services.required-service = {

     

       
219
       
 
       
            wantedBy = [ "multi-user.target" ];

     
···

       
637
       
 
       
        assert_contains(out, "\nstarting the following units: escaped\\x2ddash.service\n")

     

       
638
       
 
       
        assert_lacks(out, "the following new units were started:")

     

       
639
       
 
       


     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
640
       
 
       
        # Ensure units that require changed units are properly reloaded

     

       
641
       
 
       
        out = switch_to_specialisation("${machine}", "unitWithRequirement")

     

       
642
       
-
       
        assert_contains(out, "stopping the following units: escaped\\x2ddash.service\n")

     

       
643
       
 
       
        assert_lacks(out, "NOT restarting the following changed units:")

     

       
644
       
 
       
        assert_lacks(out, "reloading the following units:")

     

       
645
       
 
       
        assert_lacks(out, "\nrestarting the following units:")

     

···

       
214
       
 
       
          systemd.services."escaped\\x2ddash".serviceConfig.X-Test = "test";

     

       
215
       
 
       
        };

     

       
216
       
 
       


     

       
217
       
+
       
        unitStartingWithDash.configuration = {

     

       
218
       
+
       
          systemd.services."-" = {

     

       
219
       
+
       
            wantedBy = [ "multi-user.target" ];

     

       
220
       
+
       
            serviceConfig = {

     

       
221
       
+
       
              Type = "oneshot";

     

       
222
       
+
       
              RemainAfterExit = true;

     

       
223
       
+
       
              ExecStart = "${pkgs.coreutils}/bin/true";

     

       
224
       
+
       
            };

     

       
225
       
+
       
          };

     

       
226
       
+
       
        };

     

       
227
       
+
       


     

       
228
       
+
       
        unitStartingWithDashModified.configuration = {

     

       
229
       
+
       
          imports = [ unitStartingWithDash.configuration ];

     

       
230
       
+
       
          systemd.services."-" = {

     

       
231
       
+
       
            reloadIfChanged = true;

     

       
232
       
+
       
            serviceConfig.ExecReload = "${pkgs.coreutils}/bin/true";

     

       
233
       
+
       
          };

     

       
234
       
+
       
        };

     

       
235
       
+
       


     

       
236
       
 
       
        unitWithRequirement.configuration = {

     

       
237
       
 
       
          systemd.services.required-service = {

     

       
238
       
 
       
            wantedBy = [ "multi-user.target" ];

     
···

       
656
       
 
       
        assert_contains(out, "\nstarting the following units: escaped\\x2ddash.service\n")

     

       
657
       
 
       
        assert_lacks(out, "the following new units were started:")

     

       
658
       
 
       


     

       
659
       
+
       
        # Ensure units can start with a dash

     

       
660
       
+
       
        out = switch_to_specialisation("${machine}", "unitStartingWithDash")

     

       
661
       
+
       
        assert_contains(out, "stopping the following units: escaped\\x2ddash.service\n")

     

       
662
       
+
       
        assert_lacks(out, "NOT restarting the following changed units:")

     

       
663
       
+
       
        assert_lacks(out, "reloading the following units:")

     

       
664
       
+
       
        assert_lacks(out, "\nrestarting the following units:")

     

       
665
       
+
       
        assert_lacks(out, "\nstarting the following units:")

     

       
666
       
+
       
        assert_contains(out, "the following new units were started: -.service\n")

     

       
667
       
+
       


     

       
668
       
+
       
        # The regression only occurs when reloading units

     

       
669
       
+
       
        out = switch_to_specialisation("${machine}", "unitStartingWithDashModified")

     

       
670
       
+
       
        assert_lacks(out, "stopping the following units:")

     

       
671
       
+
       
        assert_lacks(out, "NOT restarting the following changed units:")

     

       
672
       
+
       
        assert_contains(out, "reloading the following units: -.service")

     

       
673
       
+
       
        assert_lacks(out, "\nrestarting the following units:")

     

       
674
       
+
       
        assert_lacks(out, "\nstarting the following units:")

     

       
675
       
+
       
        assert_lacks(out, "the following new units were started:")

     

       
676
       
+
       


     

       
677
       
 
       
        # Ensure units that require changed units are properly reloaded

     

       
678
       
 
       
        out = switch_to_specialisation("${machine}", "unitWithRequirement")

     

       
679
       
+
       
        assert_contains(out, "stopping the following units: -.service\n")

     

       
680
       
 
       
        assert_lacks(out, "NOT restarting the following changed units:")

     

       
681
       
 
       
        assert_lacks(out, "reloading the following units:")

     

       
682
       
 
       
        assert_lacks(out, "\nrestarting the following units:")