You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
tdelibs/tdecore/fakes.c

366 lines
7.7 KiB

/* This file is part of the KDE libraries
Copyright (c) 2000 The KDE Project
unsetenv() taken from the GNU C Library.
Copyright (C) 1992,1995-1999,2000-2002 Free Software Foundation, Inc.
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Library General Public
License version 2 as published by the Free Software Foundation.
This library 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
Library General Public License for more details.
You should have received a copy of the GNU Library General Public License
along with this library; see the file COPYING.LIB. If not, write to
the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
Boston, MA 02110-1301, USA.
*/
#include "tdelibs_export.h"
#include <config.h>
#ifdef _WIN32
#include <kde_file_win.h>
#define KDE_open kdewin32_open
#define KDE_mkdir kdewin32_mkdir
#else
#define KDE_open open
#define KDE_mkdir mkdir
#endif
#ifndef HAVE_SETENV
#ifdef HAVE_ALLOCA_H
#include <alloca.h>
#endif
#include <string.h>
#include <stdlib.h>
#include <unistd.h>
TDECORE_EXPORT int setenv(const char *name, const char *value, int overwrite) {
int i;
char * a;
if (!overwrite && getenv(name)) return 0;
i = strlen(name) + strlen(value) + 2;
a = (char*)malloc(i);
if (!a) return 1;
strcpy(a, name);
strcat(a, "=");
strcat(a, value);
return putenv(a);
}
#endif /* !HAVE_SETENV */
#ifndef HAVE_UNSETENV
#ifdef HAVE_ALLOCA_H
#include <alloca.h>
#endif
#include <string.h>
#include <stdlib.h>
#include <errno.h>
#include <unistd.h>
#ifndef environ
extern char ** environ;
#endif
TDECORE_EXPORT void unsetenv (name)
const char *name;
{
size_t len;
char **ep;
if (name == NULL || *name == '\0' || strchr (name, '=') != NULL)
{
errno = EINVAL;
return;
}
len = strlen (name);
ep = environ;
while (*ep != NULL)
if (!strncmp (*ep, name, len) && (*ep)[len] == '=')
{
/* Found it. Remove this pointer by moving later ones back. */
char **dp = ep;
do
dp[0] = dp[1];
while (*dp++);
/* Continue the loop in case NAME appears again. */
}
else
++ep;
}
#endif /* !HAVE_UNSETENV */
#ifndef HAVE_USLEEP
#if TIME_WITH_SYS_TIME
# include <sys/time.h>
# include <time.h>
#else
# if defined(HAVE_SYS_TIME_H)
# include <sys/time.h>
# else
# include <time.h>
# endif
#endif
#ifdef HAVE_SYS_SELECT_H
#include <sys/select.h>
#endif
#ifdef __cplusplus /* this is supposed to be a C source file but still.. */
extern "C" {
#endif
void usleep(unsigned int usec) {
struct timeval _usleep_tv;
_usleep_tv.tv_sec = usec/1000000;
_usleep_tv.tv_usec = usec%1000000;
select(0,0,0,0,&_usleep_tv);
}
#ifdef __cplusplus
}
#endif
#endif /* !HAVE_USLEEP */
#ifndef HAVE_RANDOM
long int random()
{
return lrand48();
}
void srandom(unsigned int seed)
{
srand48(seed);
}
#endif
#ifndef HAVE_SETEUID
int seteuid(uid_t euid)
{
return setreuid(-1, euid); /* Well, if you have neither you are in trouble :) */
}
#endif
#ifndef HAVE_MKSTEMPS
#include <sys/types.h>
#ifdef HAVE_SYS_STAT_H
#include <sys/stat.h>
#endif
#include <fcntl.h>
#include <string.h>
#include <strings.h>
#include <stdlib.h>
/* this is based on code taken from the GNU libc, distributed under the LGPL license */
/* Generate a unique temporary file name from TEMPLATE.
TEMPLATE has the form:
<path>/ccXXXXXX<suffix>
SUFFIX_LEN tells us how long <suffix> is (it can be zero length).
The last six characters of TEMPLATE before <suffix> must be "XXXXXX";
they are replaced with a string that makes the filename unique.
Returns a file descriptor open on the file for reading and writing. */
TDECORE_EXPORT int mkstemps (char* _template, int suffix_len)
{
static const char letters[] = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789";
char *XXXXXX;
int len;
int count;
int value;
len = strlen (_template);
if ((int) len < 6 + suffix_len || strncmp (&_template[len - 6 - suffix_len], "XXXXXX", 6))
return -1;
XXXXXX = &_template[len - 6 - suffix_len];
value = rand();
for (count = 0; count < 256; ++count)
{
int v = value;
int fd;
/* Fill in the random bits. */
XXXXXX[0] = letters[v % 62];
v /= 62;
XXXXXX[1] = letters[v % 62];
v /= 62;
XXXXXX[2] = letters[v % 62];
v /= 62;
XXXXXX[3] = letters[v % 62];
v /= 62;
XXXXXX[4] = letters[v % 62];
v /= 62;
XXXXXX[5] = letters[v % 62];
fd = KDE_open (_template, O_RDWR|O_CREAT|O_EXCL, 0600);
if (fd >= 0)
/* The file does not exist. */
return fd;
/* This is a random value. It is only necessary that the next
TMP_MAX values generated by adding 7777 to VALUE are different
with (module 2^32). */
value += 7777;
}
/* We return the null string if we can't find a unique file name. */
_template[0] = '\0';
return -1;
}
#endif /* !HAVE_MKSTEMPS */
#ifndef HAVE_MKSTEMP
TDECORE_EXPORT int mkstemp (char* _template)
{
return mkstemps( _template, 0 );
}
#endif
#ifndef HAVE_MKDTEMP
#ifndef HAVE_MKSTEMPS
#include <sys/types.h>
#ifdef HAVE_SYS_STAT_H
#include <sys/stat.h>
#endif
#endif
/* Generate a unique temporary directory name from TEMPLATE.
TEMPLATE has the form:
<path>/ccXXXXXX
The last six characters of TEMPLATE must be "XXXXXX";
they are replaced with a string that makes the filename unique.
Returns a file descriptor open on the file for reading and writing. */
TDECORE_EXPORT char* mkdtemp (char* _template)
{
static const char letters[] = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789";
char *XXXXXX;
int len;
int count;
int value;
len = strlen (_template);
if ((int) len < 6 || strncmp (&_template[len - 6], "XXXXXX", 6))
return 0;
XXXXXX = &_template[len - 6];
value = rand();
for (count = 0; count < 256; ++count)
{
int v = value;
/* Fill in the random bits. */
XXXXXX[0] = letters[v % 62];
v /= 62;
XXXXXX[1] = letters[v % 62];
v /= 62;
XXXXXX[2] = letters[v % 62];
v /= 62;
XXXXXX[3] = letters[v % 62];
v /= 62;
XXXXXX[4] = letters[v % 62];
v /= 62;
XXXXXX[5] = letters[v % 62];
/* This is a random value. It is only necessary that the next
TMP_MAX values generated by adding 7777 to VALUE are different
with (module 2^32). */
value += 7777;
if (!KDE_mkdir(_template,0700))
return _template;
}
return 0;
}
#endif /* !HAVE_MKDTEMP */
#ifndef HAVE_REVOKE
#include <errno.h>
#ifndef ENOTSUP
#define ENOTSUP 134 /* Not supported */
#endif
TDECORE_EXPORT int revoke(const char *tty)
{
errno = ENOTSUP;
return -1;
}
#endif
#ifndef HAVE_STRLCPY
#include <string.h>
TDECORE_EXPORT unsigned long strlcpy(char* d, const char* s, unsigned long bufsize)
{
unsigned long len, ret = strlen(s);
if (ret >= bufsize) {
if (bufsize) {
len = bufsize - 1;
memcpy(d, s, len);
d[len] = '\0';
}
} else
memcpy(d, s, ret + 1);
return ret;
}
#endif
#ifndef HAVE_STRLCAT
#include <string.h>
TDECORE_EXPORT unsigned long strlcat(char* d, const char* s, unsigned long bufsize)
{
char *cp;
unsigned long ret, len1, len2 = strlen(s);
cp = memchr (d, '\0', bufsize);
if (!cp)
return bufsize + len2;
len1 = cp - d;
ret = len1 + len2;
if (ret >= bufsize) {
len2 = bufsize - len1 - 1;
memcpy(cp, s, len2);
cp[len2] = '\0';
} else
memcpy(cp, s, len2 + 1);
return ret;
}
#endif