Manipulating binary files

[carol_ana]

I'm working with multidimensional arrays and i have a question that i can't solve. I'll try to summarize what i've done and the problem that i encountered.
First i work with IDL and JAVA. IDL is an interface description language.

In the IDL i did:

To read 2 files: .sav and .cnj, where these files are arrays of the type DOUBLE = Array[4, 16, 16, 16]. I had to put these 2 files into 1 file , in a binary file. (OK - DONE)


In the JAVA:

After in the Java i read this binary and restructures into a new array, also of type [4, 16, 16, 16]. (OK - DONE)


However, now I came across the following problem, the array [4, 16, 16, 16] has dimensions variable according to the file read in IDL, that is, the array would look like [4, X, X, Y] where X and Y are the dimensions that can vary.
So, in the IDL i did: i record in binary file the positions of these dimensions.


you can see my code in IDL :

PRO READ_FILE

; ---------------------
; Reading the file .sav
; ---------------------
OpenR, lun, 'C:\Documents and Settings\Projeto_Estudo\I71B16T020.0_B0061_drat0.518_Dlon012.6_Cen0.500_h0.22_base1.00_beta041.9_i021.8_Nel15.00_Blat035_Blong336_fr00001.00_fas15.sav', /Get_lun
file_sav = strarr(file_lines('C:\Documents and Settings\Projeto_Estudo\I71B16T020.0_B0061_drat0.518_Dlon012.6_Cen0.500_h0.22_base1.00_beta041.9_i021.8_Nel15.00_Blat035_Blong336_fr00001.00_fas15.sav'))
ReadF, lun, file_sav
close, lun

; ---------------------
; Reading the file .cnj
; ---------------------
OpenR, lun, 'C:\Documents and Settings\Projeto_Estudo\I71B16T020.0_B0061_drat0.518_Dlon012.6_Cen0.500_h0.22_base1.00_beta041.9_i021.8_Nel15.00_Blat035_Blong336_fr00001.00_fas15.cnj', /Get_lun
file_cnj = strarr(file_lines('C:\Documents and Settings\Projeto_Estudo\I71B16T020.0_B0061_drat0.518_Dlon012.6_Cen0.500_h0.22_base1.00_beta041.9_i021.8_Nel15.00_Blat035_Blong336_fr00001.00_fas15.cnj'))
ReadF, lun,file_cnj
close, lun

; ------------------------------------
; Restoring the files .sav e .cnj
; ------------------------------------
restore, 'C:\Documents and Settings\Projeto_Estudo\I71B16T020.0_B0061_drat0.518_Dlon012.6_Cen0.500_h0.22_base1.00_beta041.9_i021.8_Nel15.00_Blat035_Blong336_fr00001.00_fas15.sav'
restore, 'C:\Documents and Settings\Projeto_Estudo\I71B16T020.0_B0061_drat0.518_Dlon012.6_Cen0.500_h0.22_base1.00_beta041.9_i021.8_Nel15.00_Blat035_Blong336_fr00001.00_fas15.cnj'

; ------------------------------------------------------------------
; Saving to new file, creating the binary file
; ------------------------------------------------------------------
OpenW, Unit, 'C:\Documents and Settings\Projeto_Estudo\data.bin', /Get_lun, /SWAP_IF_LITTLE_ENDIAN



;-----------------------------------------------------------------------------------------------------------------
; Comparing dimensions and saving positions mod_imag [1], mod_imag [3] to file data.bin
;-----------------------------------------------------------------------------------------------------------------
    conj_imag = size(conjugado.imag, /dim)
    mod_imag = size(modelo.imag, /dim)
    if ((mod_imag[1] eq mod_imag[3]) and (conj_imag[1] eq conj_imag[3])) then begin writeu, unit, mod_imag[1], mod_imag[3]
    endif else begin
        print, 'Error: Dimension of the .sav e cnj'
        stop
    endelse


writeu, unit, modelo.imag
close, unit

END

My code - JAVA:

import java.io.DataInputStream;

import java.io.File;
import java.io.FileInputStream;

public class LeituraArquivo {
  public static void main(String args[]) {

    // Declaring the array mat
    double mat[][][][] =  new double[4][16][16][16];


   
    // Call the method readFileBin()
     mat=readFileBin("C:/Documents and Settings/Web/IDLWorkspace/Projeto_Estudo/data.bin");


    // Printing the array mat
    for(int i=0; i< 3; i++) {
             for(int j=0; j< 15; j++) {
                 for(int k=0; k< 15; k++){
                     for(int l=0; l< 15; l++){

                      }
                 }
             }
           
    }
   
 }
 
 
  public static double[][][][] readFileBin(String origem)
  {
     double aux[][][][] = new double[4][16][16][16];

     try{
         File fileOrigin = new File(origem);
         DataInputStream in = new DataInputStream(new FileInputStream(fileOrigin));
        

        
         for(int l=0; l< 15; l++) {
             for(int k=0; k< 15; k++) {
                 for(int j=0; j< 15; j++){
                     for(int i=0; i< 4; i++){
                         aux[i][j][k][l] = (double)in.readDouble();
                         System.out.print(" " + aux[i][j][k][l]);
                         
                     }
                 }
             }
         }
       
        
         in.close();
     }catch(Exception e){
         System.out.println("Error to read file: "+origem);
         e.printStackTrace();
         aux = null;
     }
     return(aux);
    

  }
}

Then I thought of doing something, read the binary in Java, get the value of positions mod_imag [1], mod_imag [3] and stored in a variable, and then to use in "for"

Example:

X= mod_imag[1];
Y = mod_imag[3];

double mat[][][][] =  new double[4][X][X][Y];

I know that the positions mod_imag [1], mod_imag [3] are of type LONG in IDL.

If you can help me.
Thank you!!!

[Norm]

Not sure I understand your problem.
Are you trying to create a 4 dimensional array in java with data read from a file?

[carol_ana]

So, these files .sav and .cnj are arrays.

However, according to the file read in IDL dimensions may vary, where the array would look like [4, X, X, Y] where X and Y are the dimensions that can vary.

So, in the IDL i did: i record in binary file the positions of these dimensions. I save the positions mod_imag [1], mod_imag [3] to file data.bin (line 34 - 43 in code - IDL)

Then I thought of doing something, read the binary in Java, get the value of positions mod_imag [1], mod_imag [3]

Do you understand?

[Norm]

Sorry I don't see where your problem is.
Does this code that you posted do what you want?

X= mod_imag[1];
Y = mod_imag[3];
 
double mat[][][][] =  new double[4][X][X][Y];  // create the array with the given dimensions

[carol_ana]

My problem is ....i have an array of the type [4, 16, 16, 16], but this array can vary dimension, as for example: [4, 17, 17, 15] or [4, 14, 14, 12]. I don't know to do this in JAVA.

Do you understand?

[Norm]

No, I don't see what your are asking about that is different from what is posted in post #4 and post #1
Why doesn't the code posted in those posts solve your problem?