file.c

/***************************************************************************
 * CVSID: $Id: file.c,v 1.7 2004/08/07 15:10:47 stefanb Exp $
 *
 * file.c : Functions for handling files
 *
 * Copyright (C) 2004 Stefan Bambach, <sbambach@gmx.net>
 *
 * Licensed under the GNU General Public License 2.0
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 **************************************************************************/
 
#ifdef HAVE_CONFIG_H
#  include <config.h>
#endif

#include <stdlib.h>
#include <stdio.h>
#include <sys/stat.h>
#include <sys/types.h>
#include <fcntl.h>
#include <unistd.h>
#include <string.h>
#include <stdio.h>

#include "file.h"
#include "dbug_mem.h"



int
sb_file_is_fifo(const char *filepath)
{
    struct stat st;
    
    if (stat(filepath, &st) != 0) {
        return 0;
    }

    if (!S_ISFIFO(st.st_mode)) {
        return 0;
    }
    
    return 1;
}



int
sb_file_is_file(const char *filepath)
{
    struct stat st;
    
    if (stat(filepath, &st) != 0) {
        return 0;
    }

    if (!S_ISREG(st.st_mode)) {
        return 0;
    }
    
    return 1;
}



int
sb_file_get_stamp(const char *filepath)
{
    struct stat st;
    
    if (stat(filepath, &st) != 0) {
        return -1;
    }

    if (!S_ISREG(st.st_mode)) {
        return -1;
    }
    
    return st.st_mtime;
}



int
sb_file_get_size(const char *filepath)
{
    struct stat st;
    
    if (stat(filepath, &st) != 0) {
        return -1;
    }

    if (!S_ISREG(st.st_mode)) {
        return -1;
    }
    
    return st.st_size;
}



char *
sb_file_read(const char *filepath)
{
    char *data = NULL;
    FILE *fp = NULL;
    int size = 0;
    int rsize = 0;
    int retval = 0;
    
    // opening file for reading
    fp = fopen(filepath, "r");
    if (fp != NULL) {
        // getting filesize
        size = sb_file_get_size(filepath);
        if (size != -1) {
            data = (char *) malloc(sizeof(char)*(size+1));
            if (data != NULL) {
                // reading file
                if ((rsize = fread(data, sizeof(char), size, fp)) >= 0) {
                    // EOF reached ?
                    if (rsize == size) {
                        retval = 1; // file successfully read
                    }
                }
                data[size]='\0';
            }
        }

        // closing file
        fclose(fp);
    }
    

    // freeing memory, if error
    if (retval == 0) {
        if (data != NULL) {
            free(data);
            data = NULL;
        }
        
        return NULL;
    }
    
    return data;
}



int
sb_file_write(const char *filepath, char *data)
{
    FILE *fp = NULL;
    int retval = 0;
    int size = strlen(data);
    int wsize = 0;
    
    // opening file for writing
    fp = fopen(filepath, "w");
    if (fp != NULL) {
        // writing to file
        if ((wsize = fwrite(data, sizeof(char), size, fp)) >= 0) {
            // EOF reached ?
            if (wsize == size) {
                retval = 1; // file successfully written
            }
        }

        // closing file
        fclose(fp);
    }
    
    return retval;
}



int
sb_file_remove(const char *filepath)
{
    if(sb_file_is_file(filepath)) {
        if(unlink(filepath)==0)
            return 1;
    }
    
    return 0;
}



int
sb_file_open(const char *filepath, int flags)
{
    int fd = -1;
    
    if ((fd = open(filepath, flags)) == -1) {
        return -1;
    }
    
    return fd;
}



int
sb_file_open_ext(const char *filepath, int flags, mode_t mode)
{
    int fd = -1;
    
    if ((fd = open(filepath, flags, mode)) == -1) {
        return -1;
    }
    
    return fd;
}



int
sb_file_close(int fd)
{
    return close(fd);
}



int
sb_file_set_lock(int fd, int type, int wait)
{
    struct flock lock[1];
    
    lock->l_type = type;
    lock->l_whence = SEEK_SET;
    lock->l_start = 0;
    lock->l_len = 0;
    
    if (wait == 1) {
        return fcntl(fd, F_SETLKW, lock);
    } else {
        return fcntl(fd, F_SETLK, lock);
    }
}



int
sb_file_lock_acquire_read(int fd)
{
    return sb_file_set_lock(fd, F_RDLCK, 0);
}



int
sb_file_lock_acquire_read_wait(int fd)
{
    return sb_file_set_lock(fd, F_RDLCK, 1);
}



int
sb_file_lock_acquire_write(int fd)
{
    return sb_file_set_lock(fd, F_WRLCK, 0);
}



int
sb_file_lock_acquire_write_wait(int fd)
{
    return sb_file_set_lock(fd, F_WRLCK, 1);
}



int
sb_file_lock_release(int fd)
{
    return sb_file_set_lock(fd, F_UNLCK, 0);
}

---