c07076082f9a808a306347a17121bcec64e39065
[scilab.git] / scilab / modules / fileio / etc / fileio.start
1 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
2 // Copyright (C) 2009-2011 - DIGITEO
3 //
4 // This file must be used under the terms of the CeCILL.
5 // This source file is licensed as described in the file COPYING, which
6 // you should have received as part of this distribution.  The terms
7 // are also available at
8 // http://www.cecill.info/licences/Licence_CeCILL_V2.1-en.txt
9
10 //Load  functions libraries
11 // =============================================================================
12 load('SCI/modules/fileio/macros/lib');
13
14 // Initialize CURL environment
15 // =============================================================================
16 function startModule()
17     if getos()=="Linux" then
18
19         // List of hard-coded paths comes from curl sources (configure.ac)
20
21         userBundle = getenv("CURL_CA_BUNDLE", "");
22         if isempty(userBundle) then // Not defined by the user
23
24             standardFiles = ["/etc/ssl/certs/ca-certificates.crt";
25                     "/etc/pki/tls/certs/ca-bundle.crt";
26                     "/usr/share/ssl/certs/ca-bundle.crt";
27                     "/usr/local/share/certs/ca-root.crt";
28                     "/etc/ssl/cert.pem"];
29
30             for iFile = 1:size(standardFiles, "*")
31                 if isfile(standardFiles(iFile)) then
32                     setenv("CURL_CA_BUNDLE", standardFiles(iFile));
33                     break
34                 end
35             end
36         end
37
38         caBundle = getenv("CURL_CA_BUNDLE", "");
39         caPath = getenv("CURL_CA_PATH", "");
40         if isempty(caBundle) & isempty(caPath) then
41             setenv("CURL_CA_PATH", "/etc/ssl/certs/");
42         end
43     end
44 endfunction
45 startModule();
46 clear startModule