xref: /petsc/share/petsc/matlab/@PetscOpenSocket/read.m (revision 7c6f9176db5c4da645a58ce748da585ef5af9aaf)
1function d = read(sreader,count,datatype)
2%
3%   O = read(sreader,count,datatype) - reads data from a socket opened with sopen(socketnumber)
4%
5%   See $PETSC_DIR/share/petsc/matlab/@PetscOpenSocket/PetscOpenSocket.m
6%
7  switch (datatype)
8  case 'int32'
9    datatype = 16;
10  case 'double'
11    datatype = 1;
12  case 'float64'
13    datatype = 1;
14  case 'uchar'
15    datatype = 6;
16  otherwise
17    disp(['Unknow datatype ' datatype])
18    return
19  end
20d = sread(sreader.fd,count,datatype);
21if datatype == 6
22  d = d';
23end
24