| /mirbsd/src/gnu/usr.bin/perl/jpl/JNI/ |
| D | JNI.xs | 72 JNIEnv* env = jplcurenv; in makeargs() local 122 jbooleanArray ja = (*env)->NewBooleanArray(env, len); in makeargs() 125 (*env)->SetBooleanArrayRegion(env, ja, 0, len, buf); in makeargs() 135 jbooleanArray ja = (*env)->NewBooleanArray(env, len); in makeargs() 136 (*env)->SetBooleanArrayRegion(env, ja, 0, len, (jboolean*)SvPV(sv,n_a)); in makeargs() 153 jbyteArray ja = (*env)->NewByteArray(env, len); in makeargs() 156 (*env)->SetByteArrayRegion(env, ja, 0, len, buf); in makeargs() 166 jbyteArray ja = (*env)->NewByteArray(env, len); in makeargs() 167 (*env)->SetByteArrayRegion(env, ja, 0, len, (jbyte*)SvPV(sv,n_a)); in makeargs() 184 jcharArray ja = (*env)->NewCharArray(env, len); in makeargs() [all …]
|
| /mirbsd/src/usr.bin/pmdb/ |
| D | clit.c | 81 struct clitenv *env = arg; in cmd_help() local 82 struct clit *cmds = env->cmds, *cmdp; in cmd_help() 83 int ncmds = env->ncmds; in cmd_help() 138 struct clitenv *env; in cmdinit() local 141 if ((env = malloc(sizeof(*env))) == NULL) in cmdinit() 144 env->cmds = cmds; in cmdinit() 145 env->ncmds = ncmds; in cmdinit() 147 env->hist = history_init(); in cmdinit() 148 history(env->hist, &ev, H_SETSIZE, 100); in cmdinit() 150 env->el = el_init(__progname, stdin, stdout, stderr); in cmdinit() [all …]
|
| /mirbsd/src/gnu/usr.bin/perl/jpl/PerlInterpreter/ |
| D | PerlInterpreter.c | 57 Java_PerlInterpreter_init(JNIEnv *env, jobject obj, jstring js) in Java_PerlInterpreter_init() argument 93 Java_PerlInterpreter_eval(env, obj, js); in Java_PerlInterpreter_init() 98 Java_PerlInterpreter_eval(JNIEnv *env, jobject obj, jstring js) in Java_PerlInterpreter_eval() argument 108 jplcurenv = env; in Java_PerlInterpreter_eval() 110 sv_setiv(envsv, (IV)(void*)env); in Java_PerlInterpreter_eval() 114 jb = (jbyte*)(*env)->GetStringUTFChars(env,js,0); in Java_PerlInterpreter_eval() 124 (*env)->ExceptionDescribe(env); in Java_PerlInterpreter_eval() 125 (*env)->ExceptionClear(env); in Java_PerlInterpreter_eval() 127 newExcCls = (*env)->FindClass(env, "java/lang/RuntimeException"); in Java_PerlInterpreter_eval() 129 (*env)->ThrowNew(env, newExcCls, SvPV(ERRSV,PL_na)); in Java_PerlInterpreter_eval() [all …]
|
| /mirbsd/src/lib/libncurses/src/ncurses/tinfo/ |
| D | lib_setup.c | 380 char *env; in _nc_get_locale() local 383 env = _nc_locale_string; in _nc_get_locale() 389 memcpy(env = _nc_get_locale_storage, "en_US.UTF-8", 12); in _nc_get_locale() 396 env = setlocale(LC_CTYPE, 0); in _nc_get_locale() 398 if (((env = getenv("LC_ALL")) != 0 && *env != '\0') in _nc_get_locale() 399 || ((env = getenv("LC_CTYPE")) != 0 && *env != '\0') in _nc_get_locale() 400 || ((env = getenv("LANG")) != 0 && *env != '\0')) { in _nc_get_locale() 406 T(("_nc_get_locale %s", _nc_visbuf(env))); in _nc_get_locale() 407 return env; in _nc_get_locale() 418 char *env; in _nc_unicode_locale() local [all …]
|
| /mirbsd/src/lib/libm/arch/i387/ |
| D | fenv.c | 140 fenv_t env; in feclearexcept() local 152 __fnstenv(&env); in feclearexcept() 153 env.x87.status &= ~ex; in feclearexcept() 154 __fldenv(env); in feclearexcept() 229 fenv_t env; in fesetexceptflag() local 238 __fnstenv(&env); in fesetexceptflag() 239 env.x87.status &= ~ex; in fesetexceptflag() 240 env.x87.status |= *flagp & ex; in fesetexceptflag() 241 __fldenv(env); in fesetexceptflag() 391 fenv_t env; in fesetenv() local [all …]
|
| /mirbsd/src/gnu/usr.bin/perl/jpl/JPL/ |
| D | Compile.pm | 212 my $env = "env"; 219 unshift(@tmpargs, $env, $obj); 261 ! tmpjb = (jbyte*)(*env)->GetStringUTFChars(env,${jarg}_,0); 263 ! (*env)->ReleaseStringUTFChars(env,${jarg}_,tmpjb); 343 ! fprintf(stderr, "env = %lx\\n", (long)$env); 385 ! (*env)->ExceptionDescribe(env); 386 ! (*env)->ExceptionClear(env); 388 ! newExcCls = (*env)->FindClass(env, "java/lang/RuntimeException"); 390 ! (*env)->ThrowNew(env, newExcCls, SvPV(ERRSV,PL_na)); 419 ! retval = (*env)->NewStringUTF(env, SvPV(retsv,PL_na)); [all …]
|
| /mirbsd/src/gnu/usr.bin/perl/NetWare/ |
| D | Nwmain.c | 117 void fnDestroyEnvBlock(char** env); 635 char** env = NULL; in fnRunScript() local 932 env = NULL; in fnRunScript() 933 fnSetUpEnvBlock(&env); // Set up the ENV block in fnRunScript() 936 exitstatus = RunPerl(pclp->m_argc, pclp->m_argv, env); in fnRunScript() 1067 if(env) in fnRunScript() 1069 fnDestroyEnvBlock(env); in fnRunScript() 1070 env = NULL; in fnRunScript() 1096 char** env = NULL; in fnSetUpEnvBlock() local 1113 env = (char **) malloc (totalcnt * sizeof(char *)); in fnSetUpEnvBlock() [all …]
|
| D | interface.c | 25 EXTERN_C int RunPerl(int argc, char **argv, char **env); 70 ClsPerlHost::PerlParse(PerlInterpreter *my_perl, int argc, char** argv, char** env) in PerlParse() argument 72 return(perl_parse(my_perl, xs_init, argc, argv, env)); // Parse the command line. in PerlParse() 120 int RunPerl(int argc, char **argv, char **env) in RunPerl() argument 151 exitstatus = nlm.PerlParse(my_perl, argc, argv, env); in RunPerl()
|
| D | interface.cpp | 28 EXTERN_C int RunPerl(int argc, char **argv, char **env); 61 ClsPerlHost::PerlParse(PerlInterpreter *my_perl, int argc, char** argv, char** env) in PerlParse() argument 63 return(perl_parse(my_perl, xs_init, argc, argv, env)); // Parse the command line. in PerlParse() 113 int RunPerl(int argc, char **argv, char **env) in RunPerl() argument 145 exitstatus = nlm.PerlParse(my_perl, argc, argv, env); in RunPerl()
|
| /mirbsd/src/usr.bin/ssh/ |
| D | session.c | 828 char **env; in child_set_env() local 837 env = *envp; in child_set_env() 839 for (i = 0; env[i]; i++) in child_set_env() 840 if (strncmp(env[i], name, namelen) == 0 && env[i][namelen] == '=') in child_set_env() 842 if (env[i]) { in child_set_env() 844 xfree(env[i]); in child_set_env() 852 env = (*envp) = xrealloc(env, envsize, sizeof(char *)); in child_set_env() 856 env[i + 1] = NULL; in child_set_env() 860 env[i] = xmalloc(strlen(name) + 1 + strlen(value) + 1); in child_set_env() 861 snprintf(env[i], strlen(name) + 1 + strlen(value) + 1, "%s=%s", name, value); in child_set_env() [all …]
|
| D | mux.c | 89 char **env; member 188 cctx->term, &cctx->tio, c->rfd, &cctx->cmd, cctx->env); in mux_session_confirm() 193 if (cctx->env != NULL) { in mux_session_confirm() 194 for (i = 0; cctx->env[i] != NULL; i++) in mux_session_confirm() 195 xfree(cctx->env[i]); in mux_session_confirm() 196 xfree(cctx->env); in mux_session_confirm() 353 cctx->env = xcalloc(env_len + 1, sizeof(*cctx->env)); in muxserver_accept_control() 355 cctx->env[i] = buffer_get_string(&m, &len); in muxserver_accept_control() 356 cctx->env[i] = NULL; in muxserver_accept_control() 371 xfree(cctx->env[j]); in muxserver_accept_control() [all …]
|
| /mirbsd/src/gnu/usr.bin/perl/utils/ |
| D | perlbug.PL | 640 my @env = 642 push @env, $Config{ldlibpthname} if $Config{ldlibpthname} ne ''; 643 push @env, grep /^(?:PERL|LC_|LANG|CYGWIN)/, keys %ENV; 644 my %env; 645 @env{@env} = @env; 646 for my $env (sort keys %env) { 647 print OUT " $env", 648 exists $ENV{$env} ? "=$ENV{$env}" : ' (unset)',
|
| /mirbsd/src/gnu/usr.bin/perl/t/op/ |
| D | chdir.t | 117 foreach my $env (@magic_envs) { 118 $Saved_Env{$env} = $ENV{$env}; 121 next if $IsVMS && $env eq 'SYS$LOGIN'; 122 next if $IsVMS && $env eq 'HOME' && !$Config{'d_setenv'}; 126 delete $ENV{$env} while exists $ENV{$env};
|
| /mirbsd/src/gnu/usr.sbin/sendmail/libsm/ |
| D | config.c | 109 putenv(env) 110 char *env; 116 p = strchr(env, '='); 119 l = p - env; 122 memmove(nbuf, env, l);
|
| /mirbsd/src/gnu/usr.bin/lynx/src/ |
| D | LYCgi.c | 52 static char **env = NULL; /* Environment variables */ variable 105 if (env) { in add_environment_value() 106 env = (char **) realloc(env, in add_environment_value() 107 sizeof(env[0]) * (envc_size + 2)); in add_environment_value() 110 env = (char **) malloc(sizeof(env[0]) * (envc_size + 2)); in add_environment_value() 112 remember_alloced(env); in add_environment_value() 114 if (env == NULL) { in add_environment_value() 117 assert(env != NULL); in add_environment_value() 120 env[envc++] = (char *) env_value; in add_environment_value() 121 env[envc] = NULL; /* Make sure it is always properly terminated */ in add_environment_value() [all …]
|
| /mirbsd/src/usr.sbin/httpd/src/main/ |
| D | util_script.c | 157 char **env = (char **) ap_palloc(p, (env_arr->nelts + 2) * sizeof(char *)); in ap_create_environment() local 166 env[j++] = ap_pstrcat(p, "TZ=", tz, NULL); in ap_create_environment() 173 env[j] = ap_pstrcat(p, elts[i].key, "=", elts[i].val, NULL); in ap_create_environment() 174 whack = env[j]; in ap_create_environment() 187 env[j] = NULL; in ap_create_environment() 188 return env; in ap_create_environment() 677 char **env, int shellcmd) in ap_call_exec() argument 776 (char *)NULL, env); in ap_call_exec() 783 (char *)NULL, env); in ap_call_exec() 790 env); in ap_call_exec() [all …]
|
| /mirbsd/src/gnu/usr.bin/binutils/ld/emultempl/ |
| D | gld960.em | 44 char *env ; 45 env = getenv("G960LIB"); 46 if (env) { 47 ldfile_add_library_path(env, FALSE); 49 env = getenv("G960BASE"); 50 if (env) 51 ldfile_add_library_path (concat (env, "/lib", (const char *) NULL), FALSE);
|
| D | gld960c.em | 46 char *env ; 47 env = getenv("G960LIB"); 48 if (env) { 49 ldfile_add_library_path(env, FALSE); 51 env = getenv("G960BASE"); 52 if (env) 53 ldfile_add_library_path (concat (env, "/lib", (const char *) NULL),
|
| /mirbsd/src/usr.bin/mail/ |
| D | vars.c | 108 char *env; in value() local 112 else if ((env = getenv(name))) { in value() 114 if (strcmp(name, "SHELL") || strlen(env)) in value() 115 return(env); in value()
|
| /mirbsd/src/usr.bin/file/magdir/ |
| D | commands | 18 0 string #!/usr/bin/env\ mksh MirBSD Korn shell script text 19 0 string #!\ /usr/bin/env\ mksh MirBSD Korn shell script text 64 0 string #!/usr/bin/env\ perl perl commands text 65 0 string #!\ /usr/bin/env\ perl perl commands text 89 0 string #!/usr/bin/env\ mksh MirBSD Korn shell script text, with BOM 90 0 string #!\ /usr/bin/env\ mksh MirBSD Korn shell script text, with BOM 99 0 string #!/usr/bin/env\ perl perl commands text, with BOM 100 0 string #!\ /usr/bin/env\ perl perl commands text, with BOM
|
| /mirbsd/src/gnu/usr.bin/perl/ |
| D | miniperlmain.c | 48 main(int argc, char **argv, char **env) in main() argument 51 (void)env; in main() 72 PERL_SYS_INIT3(&argc,&argv,&env); in main()
|
| /mirbsd/src/usr.bin/less/ |
| D | main.c | 98 char *env = (char *) ecalloc(len, sizeof(char)); local 99 strlcpy(env, "HOME=", len); 100 strlcat(env, drive, len); 101 strlcat(env, path, len); 102 putenv(env);
|
| /mirbsd/src/gnu/usr.bin/binutils/gdb/doc/ |
| D | hsuser.texi | 60 The value of the @env{HISTSIZE} shell variable is used as the 62 The text of the last @env{$HISTSIZE} 68 @env{HISTIGNORE} and @env{HISTCONTROL}. 71 file named by the @env{HISTFILE} variable (default @file{~/.bash_history}). 72 The file named by the value of @env{HISTFILE} is truncated, if 74 the value of the @env{HISTFILESIZE} variable. 76 @env{$HISTSIZE} lines are copied from the history list to the file 77 named by @env{$HISTFILE}. 81 If @env{HISTFILE} 84 to contain no more than @env{$HISTFILESIZE} [all …]
|
| /mirbsd/src/gnu/usr.bin/perl/wince/ |
| D | runperl.c | 16 main(int argc, char **argv, char **env) in main() argument 18 return RunPerl(argc, argv, env); in main()
|
| /mirbsd/src/gnu/usr.bin/perl/win32/ |
| D | runperl.c | 16 main(int argc, char **argv, char **env) in main() argument 18 return RunPerl(argc, argv, env); in main()
|