Exercise: Improve export results to pdfs in zip - refs BT#20691

Author: @christianbeeznest

main/inc/lib/exercise.lib.php

@@ -7169,9 +7169,16 @@ EOT;
         curl_setopt($ch, CURLOPT_FAILONERROR, false);
         curl_setopt($ch, CURLOPT_FOLLOWLOCATION, false);
         curl_setopt($ch, CURLOPT_HEADER, true);
+        curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, true);
+        curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, 2);
         curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
+
         $result = curl_exec($ch);
 
+        if (false === $result) {
+            error_log('saveFileExerciseResultPdf error: '.curl_error($ch));
+        }
+
         curl_close($ch);
     }
 
@@ -7188,6 +7195,7 @@ EOT;
             ''
         );
 
+        $exportOk = false;
         if (!empty($exeResults)) {
             $exportName = 'S'.$sessionId.'-C'.$courseId.'-T'.$exerciseId;
             $baseDir = api_get_path(SYS_ARCHIVE_PATH);
@@ -7209,7 +7217,8 @@ EOT;
 
             // 3. If export folder is not empty will be zipped.
             $isFolderPathEmpty = (file_exists($exportFolderPath) && 2 == count(scandir($exportFolderPath)));
-            if (!$isFolderPathEmpty) {
+            if (is_dir($exportFolderPath) && !$isFolderPathEmpty) {
+                $exportOk = true;
                 $exportFilePath = $baseDir.$exportName.'.zip';
                 $zip = new \PclZip($exportFilePath);
                 $zip->create($exportFolderPath, PCLZIP_OPT_REMOVE_PATH, $exportFolderPath);
@@ -7220,6 +7229,16 @@ EOT;
             }
         }
 
+        if (!$exportOk) {
+            Display::addFlash(
+                Display::return_message(
+                    get_lang('ExportExerciseNoResult'),
+                    'warning',
+                    false
+                )
+            );
+        }
+
         return false;
     }
 }

main/inc/lib/pdf.lib.php

@@ -560,15 +560,23 @@ class PDF
 
         if ($saveInFile) {
             $fileToSave = !empty($fileToSave) ? $fileToSave : api_get_path(SYS_ARCHIVE_PATH).uniqid();
-            @$this->pdf->Output(
-                $fileToSave,
-                $outputMode
-            ); // F to save the pdf in a file
+            try {
+                @$this->pdf->Output(
+                    $fileToSave,
+                    $outputMode
+                ); // F to save the pdf in a file
+            } catch (MpdfException $e) {
+                error_log($e);
+            }
         } else {
-            @$this->pdf->Output(
-                $output_file,
-                $outputMode
-            ); // F to save the pdf in a file
+            try {
+                @$this->pdf->Output(
+                    $output_file,
+                    $outputMode
+                ); // F to save the pdf in a file
+            } catch (MpdfException $e) {
+                error_log($e);
+            }
         }
 
         if ($outputMode != 'F') {