Back to index

plt-scheme  4.2.1
Home.cc
Go to the documentation of this file.
00001 /*                                                      -*- C++ -*-
00002  *
00003  * Purpose: get user home info
00004  *
00005  * Authors: Markus Holzem and Julian Smart
00006  *
00007  * Copyright: (C) 2004-2009 PLT Scheme Inc.
00008  * Copyright: (C) 1995, AIAI, University of Edinburgh (Julian)
00009  * Copyright: (C) 1995, GNU (Markus)
00010  *
00011  * This program is free software; you can redistribute it and/or modify
00012  * it under the terms of the GNU General Public License as published by
00013  * the Free Software Foundation; either version 2 of the License, or
00014  * (at your option) any later version.
00015  *
00016  * This program is distributed in the hope that it will be useful,
00017  * but WITHOUT ANY WARRANTY; without even the implied warranty of
00018  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
00019  * GNU General Public License for more details.
00020  *
00021  * You should have received a copy of the GNU General Public License
00022  * along with this program; if not, write to the Free Software
00023  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
00024  * 02110-1301 USA.
00025  */
00026 
00027 #include "wx.h"
00028 
00029 #include <pwd.h>
00030 #include <string.h>
00031 #include <sys/types.h>
00032 #include <unistd.h>
00033 
00034 char *wxGetUserHome(const char *user)
00035 {
00036     struct passwd *who = NULL;
00037 
00038     if (user == NULL || *user == '\0') {
00039        register char *ptr;
00040 
00041        if ((ptr = getenv("HOME")) != NULL) 
00042            return ptr;
00043        if ((ptr = getenv("USER")) != NULL
00044        || (ptr = getenv("LOGNAME")) != NULL) {
00045            who = getpwnam(ptr);
00046        }
00047        // We now make sure the user exists!
00048        if (who == NULL)
00049            who = getpwuid(getuid());
00050     } else
00051        who = getpwnam (user);
00052     return who ? who->pw_dir : (char*)NULL;
00053 }