-- Stephane Soppera (thanks) reported libc stat function fails for paths ending with "\" under win with free VC++ compiler toolkit 2003:
removed final '/' (BLI_make_file_string changes the '/' to '\\\\' for win) slashes from relevant paths, that should take care of it . Note: here (linux, glibc, gcc 3.3.3) stat doesn't have this problem. Also checking if U.pythondir ends with a slash and, if so (as long as its length > 2 to), removing the slash, for the same reason.
-- small cosmetic changes in BPY_menus.c for debug msgs and in header_scripts (added a separator in the Scripts win -> Scripts menu).
120 lines
3.4 KiB
C
120 lines
3.4 KiB
C
/*
|
|
* $Id$
|
|
*
|
|
* ***** BEGIN GPL/BL DUAL LICENSE BLOCK *****
|
|
*
|
|
* 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. The Blender
|
|
* Foundation also sells licenses for use in proprietary software under
|
|
* the Blender License. See http://www.blender.org/BL/ for information
|
|
* about this.
|
|
*
|
|
* 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.
|
|
*
|
|
* The Original Code is Copyright (C) 2001-2002 by NaN Holding BV.
|
|
* All rights reserved.
|
|
*
|
|
* This is a new part of Blender.
|
|
*
|
|
* Contributor(s): Michel Selten
|
|
*
|
|
* ***** END GPL/BL DUAL LICENSE BLOCK *****
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <Python.h>
|
|
|
|
#include <BKE_global.h>
|
|
#include <BKE_library.h>
|
|
#include <BKE_main.h>
|
|
#include <BLI_blenlib.h>
|
|
#include <DNA_space_types.h> /* for FILE_MAXDIR, FILE_MAXFILE */
|
|
|
|
#include "EXPP_interface.h"
|
|
#include "Blender.h"
|
|
#include "Registry.h"
|
|
#include "gen_utils.h"
|
|
|
|
extern char bprogname[]; /* argv[0] from creator.c */
|
|
|
|
void initBlenderApi2_2x( void )
|
|
{
|
|
g_blenderdict = NULL;
|
|
M_Blender_Init( );
|
|
}
|
|
|
|
/* this makes sure BLI_gethome() returns a path with '.blender' appended
|
|
* Besides, this function now either returns userhome/.blender (if it exists)
|
|
* or blenderInstallDir/.blender/ otherwise (can also be cvs dir).
|
|
* If append_scriptsdir is non NULL, "scripts/" is appended to the dir, to
|
|
* get the path to the scripts folder ("release/scripts/" if cvs dir).
|
|
* Finally, if all else fails BLI_gethome() is returned
|
|
* (or NULL if append_scriptdir != 0).
|
|
*/
|
|
char *bpy_gethome(int append_scriptsdir)
|
|
{
|
|
static char homedir[FILE_MAXDIR];
|
|
static char scriptsdir[FILE_MAXDIR];
|
|
char bprogdir[FILE_MAXDIR];
|
|
char *s;
|
|
int i;
|
|
|
|
if (append_scriptsdir) {
|
|
if (scriptsdir[0] != '\0')
|
|
return scriptsdir;
|
|
}
|
|
else if (homedir[0] != '\0')
|
|
return homedir;
|
|
|
|
s = BLI_gethome();
|
|
|
|
if( strstr( s, ".blender" ) )
|
|
PyOS_snprintf( homedir, FILE_MAXDIR, s );
|
|
else
|
|
BLI_make_file_string( "/", homedir, s, ".blender" );
|
|
|
|
/* if userhome/.blender/ exists, return it */
|
|
if( BLI_exists( homedir ) ) {
|
|
if (append_scriptsdir) {
|
|
BLI_make_file_string("/", scriptsdir, homedir, "scripts");
|
|
if (BLI_exists (scriptsdir)) return scriptsdir;
|
|
}
|
|
else return homedir;
|
|
}
|
|
|
|
/* otherwise, use argv[0] (bprogname) to get .blender/ in
|
|
* Blender's installation dir */
|
|
s = BLI_last_slash( bprogname );
|
|
|
|
i = s - bprogname + 1;
|
|
|
|
PyOS_snprintf( bprogdir, i, bprogname );
|
|
BLI_make_file_string( "/", homedir, bprogdir, ".blender" );
|
|
|
|
if (BLI_exists(homedir)) {
|
|
if (append_scriptsdir) {
|
|
BLI_make_file_string("/", scriptsdir, homedir, "scripts");
|
|
if (BLI_exists(scriptsdir)) return scriptsdir;
|
|
}
|
|
else return homedir;
|
|
}
|
|
|
|
/* last try for scripts dir: blender in cvs dir, scripts/ inside release/: */
|
|
if (append_scriptsdir) {
|
|
BLI_make_file_string("/", scriptsdir, bprogdir, "release/scripts");
|
|
if (BLI_exists(scriptsdir)) return scriptsdir;
|
|
}
|
|
|
|
return NULL;
|
|
}
|