archive/ruby
1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2025-08-15 13:39:04 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions 4

eban

Browse source 
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@859 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
eban 2000-07-29 14:05:15 +00:00
parent 77e876615d
commit 7d87fac63a
3 changed files with 13 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

13
ruby.c
View file

@ -115,7 +115,7 @@ rubylib_mangle(s, l)
{
static char *newp, *oldp;
static int newl, oldl, notfound;
static char ret[STATIC_FILE_LENGTH+1];
static char newsub[STATIC_FILE_LENGTH+1];
if (!newp && !notfound) {
newp = getenv("RUBYLIB_PREFIX");
@ -133,8 +133,8 @@ rubylib_mangle(s, l)
if (newl == 0 || oldl == 0 || newl > STATIC_FILE_LENGTH) {
rb_fatal("malformed RUBYLIB_PREFIX");
}
strcpy(ret, newp);
s = ret;
strcpy(newsub, newp);
s = newsub;
while (*s) {
if (*s == '\\') *s = '/';
s++;
@ -147,6 +147,7 @@ rubylib_mangle(s, l)
l = strlen(s);
}
if (!newp || l < oldl || strncasecmp(oldp, s, oldl) != 0) {
static char ret[STATIC_FILE_LENGTH+1];
strncpy(ret, s, l);
ret[l] = 0;
return ret;
@ -154,9 +155,9 @@ rubylib_mangle(s, l)
if (l + newl - oldl > STATIC_FILE_LENGTH || newl > STATIC_FILE_LENGTH) {
rb_fatal("malformed RUBYLIB_PREFIX");
}
strcpy(ret + newl, s + oldl);
ret[l + newl - oldl] = 0;
return ret;
strcpy(newsub + newl, s + oldl);
newsub[l + newl - oldl] = 0;
return newsub;
}
#define rubylib_mangled_path(s, l) rb_str_new2(rubylib_mangle((s), (l)))
#define rubylib_mangled_path2(s) rb_str_new2(rubylib_mangle((s), 0))