pro eve_get_data, level, start_yyyydoy, end_yyyydoy, hour=hour, verbose=verbose, oufn=oufn, version=version, revision=revision, overwrite=overwrite
if n_elements(version) eq 0 or n_elements(revision) eq 0 then begin
file_mkdir,getenv('EVE_DATA')
eve_wget,'http://lasp.colorado.edu/eve/data_access/evewebdata/quicklook/L0CS/version.dat',getenv('EVE_DATA')+'/version.dat'
version_dat=eve_read_dat(getenv('EVE_DATA')+'/version.dat',/quiet)
version=version_dat.version
revision=version_dat.revision
end
oUrl = OBJ_NEW('IDLnetUrl')
oUrl->SetProperty, VERBOSE = keyword_set(verbose)
oUrl->SetProperty, url_scheme = 'http'
oUrl->SetProperty, URL_HOST = 'lasp.colorado.edu'
if n_elements(end_yyyydoy) eq 0 then end_yyyydoy=start_yyyydoy
yyyydoy=start_yyyydoy
while yyyydoy le end_yyyydoy do begin
year=yyyydoy/1000
doy=yyyydoy mod 1000
if level eq 2 then begin
local_dir=string(format='(%"%s/level2/%04d/%03d/")',getenv('EVE_DATA'),year,doy)
file_mkdir, local_dir
type=['EVL','EVS']
for i_type=0,1 do begin
IF SIZE( hour, /TYPE ) NE 0 THEN BEGIN
for chour = 0, N_ELEMENTS( hour ) - 1 do begin
curHour = hour[chour]
fn=string(format='(%"%s_L2_%07d_%02d_%03d_%02d.fit.gz")',type[i_type],yyyydoy,curhour,version,revision)
f=file_search(local_dir+fn,count=count)
if count eq 0 or keyword_set(overwrite) then begin
eve_wget,string(format='(%"http://lasp.colorado.edu/eve/data_access/evewebdataproducts/level2/%04d/%03d/%s")',year, doy,fn),local_dir+fn,verbose=keyword_set(verbose)
end
if keyword_set(verbose) then PRINT, 'filename returned = ', fn
ENDFOR
ENDIF ELSE BEGIN
for curhour=0,23 do begin
fn=string(format='(%"%s_L2_%07d_%02d_%03d_%02d.fit.gz")',type[i_type],yyyydoy,curhour,version,revision)
f=file_search(local_dir+fn,count=count)
if count eq 0 or keyword_set(overwrite) then begin
eve_wget,string(format='(%"http://lasp.colorado.edu/eve/data_access/evewebdataproducts/level2/%04d/%03d/%s")',year, doy,fn),local_dir+fn,verbose=keyword_set(verbose)
end
if keyword_set(verbose) then PRINT, 'filename returned = ', fn
endfor
ENDELSE
end
end else if level eq 3 then begin
local_dir=string(format='(%"%s/level3/%04d/")',getenv('EVE_DATA'),year)
file_mkdir,local_dir
fn = string(format='(%"EVE_L3_%07d_%03d_%02d.fit")', yyyydoy, version, revision)
oUrl->SetProperty, URL_PATH = string(format='(%"eve/data_access/evewebdataproducts/level3/%04d/%s")',year, fn)
oufn = oUrl->Get(FILENAME = local_dir+ fn )
if keyword_set(verbose) then PRINT, 'filename returned = ', oufn
end
eve_next_yyyydoy,yyyydoy,yyyydoy
end
OBJ_DESTROY, oUrl
end