merge revision(s) 17849:
* ruby.c: Mac OS X needs origargc times of '\0' in origargv. [ruby-dev:35308] git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8_6@17994 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
parent
d83a42aac2
commit
e7023df46a
|
@ -1,3 +1,8 @@
|
|||
Thu Jul 10 18:35:07 2008 Kazuhiro NISHIYAMA <zn@mbf.nifty.com>
|
||||
|
||||
* ruby.c: Mac OS X needs origargc times of '\0' in
|
||||
origargv. [ruby-dev:35308]
|
||||
|
||||
Thu Jul 10 13:51:03 2008 Tanaka Akira <akr@fsij.org>
|
||||
|
||||
* include/ruby/ruby.h (POSFIXABLE): use FIXNUM_MAX+1 instead of
|
||||
|
|
64
ruby.c
64
ruby.c
|
@ -1029,6 +1029,39 @@ set_arg0space()
|
|||
#define set_arg0space() ((void)0)
|
||||
#endif
|
||||
|
||||
static int
|
||||
get_arglen(int argc, char **argv)
|
||||
{
|
||||
char *s = argv[0];
|
||||
int i;
|
||||
|
||||
if (!argc) return 0;
|
||||
s += strlen(s);
|
||||
/* See if all the arguments are contiguous in memory */
|
||||
for (i = 1; i < argc; i++) {
|
||||
if (argv[i] == s + 1) {
|
||||
s++;
|
||||
s += strlen(s); /* this one is ok too */
|
||||
}
|
||||
else {
|
||||
break;
|
||||
}
|
||||
}
|
||||
#if defined(USE_ENVSPACE_FOR_ARG0)
|
||||
if (environ && (s == environ[0])) {
|
||||
s += strlen(s);
|
||||
for (i = 1; environ[i]; i++) {
|
||||
if (environ[i] == s + 1) {
|
||||
s++;
|
||||
s += strlen(s); /* this one is ok too */
|
||||
}
|
||||
}
|
||||
ruby_setenv("", NULL); /* duplicate environ vars */
|
||||
}
|
||||
#endif
|
||||
return s - argv[0];
|
||||
}
|
||||
|
||||
static void
|
||||
set_arg0(val, id)
|
||||
VALUE val;
|
||||
|
@ -1037,8 +1070,9 @@ set_arg0(val, id)
|
|||
VALUE progname;
|
||||
char *s;
|
||||
long i;
|
||||
int j;
|
||||
#if !defined(PSTAT_SETCMD) && !defined(HAVE_SETPROCTITLE)
|
||||
static int len;
|
||||
static int len = 0;
|
||||
#endif
|
||||
|
||||
if (origargv == 0) rb_raise(rb_eRuntimeError, "$0 not initialized");
|
||||
|
@ -1065,27 +1099,7 @@ set_arg0(val, id)
|
|||
progname = rb_tainted_str_new(s, i);
|
||||
#else
|
||||
if (len == 0) {
|
||||
char *s = origargv[0];
|
||||
int i;
|
||||
|
||||
s += strlen(s);
|
||||
/* See if all the arguments are contiguous in memory */
|
||||
for (i = 1; i < origargc; i++) {
|
||||
if (origargv[i] == s + 1) {
|
||||
s++;
|
||||
s += strlen(s); /* this one is ok too */
|
||||
}
|
||||
else {
|
||||
break;
|
||||
}
|
||||
}
|
||||
#if defined(USE_ENVSPACE_FOR_ARG0)
|
||||
if (s + 1 == envspace.begin) {
|
||||
s = envspace.end;
|
||||
ruby_setenv("", NULL); /* duplicate environ vars */
|
||||
}
|
||||
#endif
|
||||
len = s - origargv[0];
|
||||
len = get_arglen(origargc, origargv);
|
||||
}
|
||||
|
||||
if (i >= len) {
|
||||
|
@ -1095,8 +1109,10 @@ set_arg0(val, id)
|
|||
s = origargv[0] + i;
|
||||
*s = '\0';
|
||||
if (++i < len) memset(s + 1, ' ', len - i);
|
||||
for (i = 1; i < origargc; i++)
|
||||
origargv[i] = s;
|
||||
for (i = len-1, j = origargc-1; j > 0 && i >= 0; --i, --j) {
|
||||
origargv[j] = origargv[0] + i;
|
||||
*origargv[j] = '\0';
|
||||
}
|
||||
progname = rb_tainted_str_new2(origargv[0]);
|
||||
#endif
|
||||
rb_progname = rb_obj_freeze(progname);
|
||||
|
|
Loading…
Reference in New Issue