@@ -1359,11 +1359,31 @@ public function remote_machineClone($args) {
13591359 $ src = $ nsrc ->machine ;
13601360 }
13611361 /* @var $m IMachine */
1362- $ m = $ this ->vbox ->createMachine ($ this ->vbox ->composeMachineFilename ($ args ['name ' ],null ,null ,null ),$ args ['name ' ],null ,null ,null ,null ,null ,null );
1362+ $ m = $ this ->vbox ->createMachine (
1363+ // settingsFile
1364+ $ this ->vbox ->composeMachineFilename ($ args ['name ' ],null ,null ,null ),
1365+ // name
1366+ $ args ['name ' ],
1367+ // platform
1368+ strval ($ src ->platform ->architecture ),
1369+ // Groups
1370+ null ,
1371+ // osTypeId
1372+ null ,
1373+ // flags
1374+ null ,
1375+ // cipher
1376+ null ,
1377+ // passwordId
1378+ null ,
1379+ // password
1380+ null
1381+ );
1382+
13631383 $ sfpath = $ m ->settingsFilePath ;
13641384
13651385 /* @var $cm CloneMode */
1366- $ cm = new CloneMode (null ,$ args ['vmState ' ]);
1386+ $ cm = new CloneMode (null , $ args ['vmState ' ]);
13671387 $ state = $ cm ->ValueMap [$ args ['vmState ' ]];
13681388
13691389
@@ -1372,25 +1392,30 @@ public function remote_machineClone($args) {
13721392 if ($ args ['link ' ]) $ opts [] = 'Link ' ;
13731393
13741394 /* @var $progress IProgress */
1375- $ progress = $ src ->cloneTo ($ m ->handle ,$ args ['vmState ' ],$ opts );
1395+ $ progress = $ src ->cloneTo ($ m ->handle , $ args ['vmState ' ], $ opts );
13761396
1397+ $ exp = "" ;
13771398 // Does an exception exist?
13781399 try {
13791400 if ($ progress ->errorInfo ->handle ) {
13801401 $ this ->errors [] = new Exception ($ progress ->errorInfo ->text );
13811402 $ progress ->releaseRemote ();
13821403 return false ;
13831404 }
1384- } catch (Exception $ null ) {}
1405+ } catch (Exception $ e ) {
1406+ $ exp = $ e ->getMessage ();
1407+ }
13851408
13861409 $ m ->releaseRemote ();
13871410 $ src ->releaseRemote ();
13881411
13891412 $ this ->_util_progressStore ($ progress );
13901413
13911414 return array (
1392- 'progress ' => $ progress ->handle ,
1393- 'settingsFilePath ' => $ sfpath );
1415+ 'progress ' => $ progress ->handle ,
1416+ 'settingsFilePath ' => $ sfpath ,
1417+ 'exp ' => $ exp ,
1418+ );
13941419
13951420 }
13961421
0 commit comments