51 lines
1.4 KiB
Matlab
51 lines
1.4 KiB
Matlab
%% By L_DelOff
|
||
% Функция формирует ссылку и скачивает архив с сайта NOAA
|
||
% status=0 - cкачал успешно
|
||
|
||
function status=downloadEvent(url)
|
||
global param
|
||
%% Дебаг
|
||
if 1%param.downloadEvent.debug
|
||
param.downloadEvent.debug=1;
|
||
param.downloadEvent.loglevel=3;
|
||
param.data.path='D:\Git\earthquake\DATA\';
|
||
url='https://satdat.ngdc.noaa.gov/dmsp/data/f18/ssies/2014/03/PS.CKGWC_SC.U_DI.A_GP.SIES3-F18-R99990-B9999090-APGA_AR.GLOBAL_DD.20140303_TP.000001-235959_DF.EDR.gz';
|
||
end
|
||
%% Начало
|
||
if param.downloadEvent.loglevel==3
|
||
message=['Скачиваю... \n'];
|
||
fprintf(message)
|
||
end
|
||
%% Вытаскиваю из URL имя файла
|
||
a=find((ismember(url,'/')));
|
||
filename=url(a(end)+1:end);
|
||
%% Путь для скачивания
|
||
filepath=[param.data.path 'temp/' filename];
|
||
%% Проверяю, можно ли записать в темп
|
||
if ~isfolder([param.data.path 'temp'])
|
||
mkdir([param.data.path 'temp'])
|
||
end
|
||
%% Скачиваю
|
||
try
|
||
outfilename = websave(filepath,url);
|
||
status=0;
|
||
catch ME
|
||
warning(ME.message);
|
||
switch ME.identifier
|
||
case 'MATLAB:webservices:HTTP404StatusCodeError'
|
||
status=404;
|
||
otherwise
|
||
ME
|
||
status=-1;
|
||
end
|
||
end
|
||
|
||
if param.downloadEvent.loglevel==3
|
||
if status==0
|
||
message=['\bГотово \n'];
|
||
fprintf(message)
|
||
end
|
||
end
|
||
end
|
||
|