MyLib.c

Idź do dokumentacji tego pliku.

#include "MyLib.h"

// Wyklad Nr 06

const int N=25;
const int M=25;

void WyswietlMacierz(int n, int m, double a[][M])
{
    int i,j;

    for(i=0; i<n; i=i+1)
    {
        for(j=0; j<m; j=j+1)
        {
            printf("%6.2lf ",a[i][j]);
        }
        printf("\n");
    }
}

void ZapisMacierzy(char *NazwaPliku, int n, int m, double a[][M])
{
    FILE *fPlik;
    int i,j;

    fPlik = fopen(NazwaPliku,"w");
    fprintf(fPlik,"%i\n%i\n",n,m);
    for(i=0; i<n; i=i+1)
    {
        for(j=0; j<m; j=j+1)
        {
            fprintf(fPlik,"%4.2lf\n",a[i][j]);
        }
    }
    fclose(fPlik);
}

void OdczytMacierzy(char *NazwaPliku, int *n, int *m, double a[][M])
{
    FILE *fPlik;
    int i,j;

    fPlik = fopen(NazwaPliku,"r");
    fscanf(fPlik,"%i", n);
    fscanf(fPlik,"%i", m);
    for(i=0; i<*n; i=i+1)
    {
        for(j=0; j<*m; j=j+1)
        {
            fscanf(fPlik,"%lf",&a[i][j]);
        }
    }
    fclose(fPlik);
}
//-------------------------------------------------------------------------
// Wyklad Nr 08

const char separator[] = ";\r\t\n";
const char sepStr[] = "\"";

int parserCSV(char *buf, char *ws[], int n, const char *delim)
{
    int i;

    ws[0] = buf;
    for(i=1; i<=n; i=i+1)
    {
        ws[i] = strpbrk(ws[i-1], delim);
        if( ws[i]==NULL)
            break;
        *ws[i] = '\0';
        ws[i]  = ws[i]+1;
    }
    return i-1;
}

void readCSV(char *nazwaCSV,int *N, struct TLst Lst[])
{
    char buf[1024],*wr,*ws[32],*wt[3];
    FILE *fDane;
    int i,n;

    fDane = fopen(nazwaCSV, "r");
    *N = 0;
    n = 3;
    if( fDane==NULL )
    {
        perror(nazwaCSV);
        exit(-1);
    }
    printf("z pliku \"%s\"", nazwaCSV);
    while( fgets(buf,1024,fDane)!=NULL )
    {
/* tu mozemy sprawdzic co jest wczytywane
        printf(">%s<\n",buf);
*/
        if( parserCSV(buf, ws, n, separator)!=n )
            continue;
        for(i=0; i<n; i=i+1)
        {
            if( parserCSV(ws[i], wt, 2, sepStr)==2 )
            {
                switch( i )
                {
                    case 0:
                        strcpy(Lst[*N].Im, wt[1]);
                     break;
                    case 1:
                        strcpy(Lst[*N].Na, wt[1]);
                     break;
                    default:
                        puts("ERROR: zly rekord !?");
                     break;
                }
            }
            else
            {
                wr = strchr(ws[i],',');
                if( wr!=NULL)
                    *wr = '.';
                Lst[*N].Ocena = atof(ws[i]);
            }
        }
        *N = *N+1;
    }
    fclose(fDane);
}
//-------------------------------------------------------------------------

---