diff --git a/src/gnome/file-utils.c b/src/gnome/file-utils.c deleted file mode 100644 index 65fddff28a..0000000000 --- a/src/gnome/file-utils.c +++ /dev/null @@ -1,136 +0,0 @@ -/********************************************************************\ - * file-utils.c -- simple file utilities * - * Copyright (C) 1997 Robin D. Clark * - * Copyright (C) 1998 Linas Vepstas * - * Copyright (C) 1998 Rob Browning * - * Copyright (C) 1999-2000 Linas Vepstas * - * * - * 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., 675 Mass Ave, Cambridge, MA 02139, USA. * - * * - * Author: Rob Clark * - * Internet: rclark@cs.hmc.edu * - * Address: 609 8th Street * - * Huntington Beach, CA 92648-4632 * -\********************************************************************/ - -#include "config.h" - -#include -#include -#include -#include -#include - -#include -#include - -#include "file-utils.h" -#include "messages.h" -#include "gnc-engine-util.h" - -/* This static indicates the debugging module that this .o belongs to. */ -static short module = MOD_GUILE; - -/********************************************************************\ -\********************************************************************/ - -char * -gncFindFile (const char * filename) -{ - char *full_filename = NULL; - char *g_filename; - SCM find_doc_file; - SCM scm_filename; - SCM scm_result; - - if (!filename || *filename == '\0') - return NULL; - - /* This should be gh_lookup, but that appears to be broken */ - find_doc_file = gh_eval_str("gnc:find-doc-file"); - scm_filename = gh_str02scm ((char *) filename); - scm_result = gh_call1(find_doc_file, scm_filename); - - if (gh_string_p(scm_result)) - full_filename = gh_scm2newstr(scm_result, NULL); - - g_filename = g_strdup (full_filename); - if (full_filename) - free (full_filename); - - return g_filename; -} - -/********************************************************************\ - * htmlRead * - * * - * Args: file - the name of the html file to read * - * data - pointer to set to the buffer of data read in * - * Return: size of data read * - * Global: helpPath - the path to the help files * -\********************************************************************/ -int -gncReadFile (const char * file, char ** data) -{ - char *buf=NULL; - char *filename; - int size=0; - int fd; - - /* construct absolute path -- twiddle the relative path we received */ - if (!file || file[0] == '\0') return 0; - - /* take absolute paths without searching */ - if (file[0] != '/') - filename = gncFindFile (file); - else - filename = g_strdup (file); - - if (!filename) return 0; - - /* Open file: */ - fd = open( filename, O_RDONLY ); - - g_free(filename); filename = NULL; - - if( fd == -1 ) - { - ERROR(); - PERR ("file was %s\n", file); - return 0; - } - - /* Find size: */ - size = lseek( fd, 0, SEEK_END ); - lseek( fd, 0, SEEK_SET ); - - /* Allocate memory */ - buf = g_new(char, size + 1); - - /* read in file */ - if( read(fd,buf,size) == -1 ) - { - g_free(buf); - buf=NULL; - } - buf[size] = '\0'; - - close(fd); - *data = buf; - - return size; -} - -/* ----------------------- END OF FILE --------------------- */