source: trunk/etc/src/yf2m.c @ 1

#include <stdio.h>
#include <stdlib.h>

#define BUFSIZE 80

int main (int argc, char *argv[])
{ /* . Syntaxe : yf2m f1 mf ncol
     . Purpose : file (f1)  to matlab matrice file (mf) ;
                 ncol is the number of column of the matrice.
     . Compilation : cc -Wall -o yf2m yf2m.c */

        FILE    *f1, *mf;
        char    buf[BUFSIZE+1];
        int     ncol;
        int     icol, nblig;

        if ((f1 = fopen(argv[1], "r")) <= 0)
        {       printf ("yao file %s not found !!!\n", argv[1]);
                exit(0);
        }
        if ((mf = fopen(argv[2], "w")) <= 0)
        {       printf ("failed while opening matlab file %s !!!\n", argv[2]);
                exit(0);
        }

        ncol = atoi(argv[3]);
        if (ncol<=0)
        {       printf ("bad value for ncol \n");
                exit(0);
        }

        icol=0; nblig=0;
        //while (fgets (buf, BUFSIZE, f1) != NULL)
        while (fscanf(f1, "%s", buf) > 0)
        {
                fprintf(mf, "%s", buf);         //printf("%s", buf);
                icol = (icol+1)%ncol;
                if (icol) fprintf(mf, "\t");    //printf("\t");
                else
                {         fprintf(mf, "\n");    //printf("\n");
                          ++nblig;
                }
        }

        if (icol != 0)
           printf("\nyf2m: Warning : last line not complete : only %i elt instead of %i \n", icol, ncol);

        printf ("yf2m: %i line resumed\n", nblig);
        return(0);
}