source: trunk/src/dir_uvmat.m @ 1022

Last change on this file since 1022 was 1022, checked in by sommeria, 3 years ago

opendap reading intreoduced

File size: 627 bytes
Line 
1function [ ListFiles ] = dir_uvmat( DirName)
2if regexp(DirName,'^http://')
3    catalog=[DirName,'/catalog.xml'];
4    str=urlread(catalog);
5    ListFiles=(regexp(str,'xlink:title="(?<name>[^"]+)"','names'))';
6    NumDir=numel(ListFiles);
7    ListFiles=[ListFiles;(regexp(str,'dataset name="(?<name>[^"]+)"','names'))'];
8    for ilist=1:numel(ListFiles)
9        ListFiles(ilist).date=0;
10        ListFiles(ilist).bytes=0;
11        ListFiles(ilist).isdir=false;
12        ListFiles(ilist).datenum=0;
13    end
14    for ilist=1:NumDir
15        ListFiles(ilist).isdir=true;
16    end
17else
18    ListFiles=dir(DirName);
19end
20
Note: See TracBrowser for help on using the repository browser.