Lines Matching refs:var
913 register SHELL_VAR *var;
915 for (i = 0; list && (var = list[i]); i++)
916 if (invisible_p (var) == 0)
917 print_assignment (var);
927 register SHELL_VAR *var;
929 for (i = 0; list && (var = list[i]); i++)
931 printf ("%s ", var->name);
932 print_var_function (var);
941 print_assignment (var)
942 SHELL_VAR *var;
944 if (var_isset (var) == 0)
947 if (function_p (var))
949 printf ("%s", var->name);
950 print_var_function (var);
954 else if (array_p (var))
955 print_array_assignment (var, 0);
959 printf ("%s=", var->name);
960 print_var_value (var, 1);
970 print_var_value (var, quote)
971 SHELL_VAR *var;
976 if (var_isset (var) == 0)
979 if (quote && posixly_correct == 0 && ansic_shouldquote (value_cell (var)))
981 t = ansic_quote (value_cell (var), 0, (int *)0);
985 else if (quote && sh_contains_shell_metas (value_cell (var)))
987 t = sh_single_quote (value_cell (var));
992 printf ("%s", value_cell (var));
998 print_var_function (var)
999 SHELL_VAR *var;
1001 if (function_p (var) && var_isset (var))
1002 printf ("%s", named_function_string ((char *)NULL, function_cell(var), 1));
1031 tempvar = (*(var->dynamic_value)) (var);
1033 Sometimes `tempvar' will replace the value of `var'. Other times, the
1044 #define INIT_DYNAMIC_VAR(var, val, gfunc, afunc) \
1047 v = bind_variable (var, (val), 0); \
1053 #define INIT_DYNAMIC_ARRAY_VAR(var, gfunc, afunc) \
1056 v = make_new_array_variable (var); \
1132 get_seconds (var)
1133 SHELL_VAR *var;
1141 FREE (value_cell (var));
1143 VSETATTR (var, att_integer);
1144 var_setvalue (var, p);
1145 return (var);
1220 get_random (var)
1221 SHELL_VAR *var;
1230 FREE (value_cell (var));
1232 VSETATTR (var, att_integer);
1233 var_setvalue (var, p);
1234 return (var);
1238 assign_lineno (var, value, unused)
1239 SHELL_VAR *var;
1248 return var;
1253 get_lineno (var)
1254 SHELL_VAR *var;
1261 FREE (value_cell (var));
1262 var_setvalue (var, p);
1263 return (var);
1267 assign_subshell (var, value, unused)
1268 SHELL_VAR *var;
1277 return var;
1281 get_subshell (var)
1282 SHELL_VAR *var;
1287 FREE (value_cell (var));
1288 var_setvalue (var, p);
1289 return (var);
1293 get_bash_command (var)
1294 SHELL_VAR *var;
1306 FREE (value_cell (var));
1307 var_setvalue (var, p);
1308 return (var);
1313 get_histcmd (var)
1314 SHELL_VAR *var;
1319 FREE (value_cell (var));
1320 var_setvalue (var, p);
1321 return (var);
1328 get_comp_wordbreaks (var)
1329 SHELL_VAR *var;
1335 var_setvalue (var, rl_completer_word_break_characters);
1337 return (var);
1549 SHELL_VAR *var;
1552 var = (SHELL_VAR *)NULL;
1562 var = hash_lookup (name, temporary_env);
1564 if (var == 0)
1565 var = var_lookup (name, shell_variables);
1567 if (var == 0)
1570 return (var->dynamic_value ? (*(var->dynamic_value)) (var) : var);
1602 get_variable_value (var)
1603 SHELL_VAR *var;
1605 if (var == 0)
1608 else if (array_p (var))
1609 return (array_reference (array_cell (var), 0));
1612 return (value_cell (var));
1624 SHELL_VAR *var;
1626 var = find_variable (var_name);
1627 return ((var) ? get_variable_value (var) : (char *)NULL);
1740 SHELL_VAR *var;
1743 var = make_local_variable (name);
1744 if (var == 0 || array_p (var))
1745 return var;
1749 FREE (value_cell(var));
1750 var_setarray (var, array);
1751 VSETATTR (var, att_array);
1752 return var;
1821 make_variable_value (var, value, flags)
1822 SHELL_VAR *var;
1835 if (integer_p (var))
1839 oval = value_cell (var);
1861 oval = get_variable_value (var);
1999 bind_variable_value (var, value, aflags)
2000 SHELL_VAR *var;
2006 VUNSETATTR (var, att_invisible);
2008 if (var->assign_func)
2012 t = (aflags & ASS_APPEND) ? make_variable_value (var, value, aflags) : value;
2013 (*(var->assign_func)) (var, t, -1);
2019 t = make_variable_value (var, value, aflags);
2020 FREE (value_cell (var));
2021 var_setvalue (var, t);
2024 INVALIDATE_EXPORTSTR (var);
2027 VSETATTR (var, att_exported);
2029 if (exported_p (var))
2032 return (var);
2083 bind_var_to_int (var, val)
2084 char *var;
2090 return (bind_int_variable (var, p));
2178 SHELL_VAR *var;
2195 var = find_variable (name);
2196 if (var && (readonly_p (var) || noassign_p (var)))
2198 if (readonly_p (var))
2217 var = hash_lookup (name, temporary_env);
2218 if (var == 0)
2219 var = make_new_variable (name, temporary_env);
2221 FREE (value_cell (var));
2229 var_setvalue (var, value);
2230 var->attributes |= (att_exported|att_tempvar);
2231 var->context = variable_context; /* XXX */
2233 INVALIDATE_EXPORTSTR (var);
2234 var->exportstr = mk_env_string (name, value, 0);
2239 setifs (var);
2259 copy_variable (var)
2260 SHELL_VAR *var;
2264 if (var)
2268 copy->attributes = var->attributes;
2269 copy->name = savestring (var->name);
2271 if (function_p (var))
2272 var_setfunc (copy, copy_command (function_cell (var)));
2274 else if (array_p (var))
2275 var_setarray (copy, dup_array (array_cell (var)));
2277 else if (value_cell (var))
2278 var_setvalue (copy, savestring (value_cell (var)));
2282 copy->dynamic_value = var->dynamic_value;
2283 copy->assign_func = var->assign_func;
2285 copy->exportstr = COPY_EXPORTSTR (var);
2287 copy->context = var->context;
2301 dispose_variable (var)
2302 SHELL_VAR *var;
2304 if (var == 0)
2307 if (function_p (var))
2308 dispose_command (function_cell (var));
2310 else if (array_p (var))
2311 array_dispose (array_cell (var));
2314 FREE (value_cell (var));
2316 FREE_EXPORTSTR (var);
2318 free (var->name);
2320 if (exported_p (var))
2323 free (var);
2484 SHELL_VAR *var;
2486 var = (SHELL_VAR *)data;
2487 dispose_variable (var);
2604 vlist_add (vlist, var, flags)
2606 SHELL_VAR *var;
2612 if (STREQ (var->name, vlist->list[i]->name))
2620 vlist->list[vlist->list_len++] = var;
2688 SHELL_VAR *var;
2697 var = (SHELL_VAR *)tlist->data;
2699 r = func ? (*func) (var) : 1;
2701 vlist_add (vlist, var, flags);
2768 visible_var (var)
2769 SHELL_VAR *var;
2771 return (invisible_p (var) == 0);
2789 visible_and_exported (var)
2790 SHELL_VAR *var;
2792 return (invisible_p (var) == 0 && exported_p (var));
2798 local_and_exported (var)
2799 SHELL_VAR *var;
2801 return (invisible_p (var) == 0 && local_p (var) && var->context == variable_context && exported_p (var));
2817 variable_in_context (var)
2818 SHELL_VAR *var;
2820 return (invisible_p (var) == 0 && local_p (var) && var->context == variable_context);
2857 visible_array_vars (var)
2858 SHELL_VAR *var;
2860 return (invisible_p (var) == 0 && array_p (var));
2908 SHELL_VAR *var;
2910 var = temporary_env ? hash_lookup (name, temporary_env) : (SHELL_VAR *)NULL;
2912 if (var)
2914 FREE (value_cell (var));
2915 var_setvalue (var, savestring (value));
2916 INVALIDATE_EXPORTSTR (var);
2919 return (var);
2937 SHELL_VAR *var, *v;
2940 var = (SHELL_VAR *)data;
2952 v = bind_variable_internal (var->name, value_cell (var), binding_table, 0, 0);
2957 var->attributes &= ~(att_tempvar|att_propagate);
2960 var->attributes |= att_propagate;
2964 v->attributes |= var->attributes;
2966 dispose_variable (var);
2973 SHELL_VAR *var;
2975 var = (SHELL_VAR *)data;
2976 if (tempvar_p (var) && (var->attributes & att_propagate))
2979 dispose_variable (var);
3081 register SHELL_VAR *var;
3086 #define USE_EXPORTSTR (value == var->exportstr)
3088 for (i = 0, list_index = 0; var = vars[i]; i++)
3092 INVALIDATE_EXPORTSTR (var);
3094 if (var->exportstr)
3095 value = var->exportstr;
3096 else if (function_p (var))
3097 value = named_function_string ((char *)NULL, function_cell (var), 0);
3099 else if (array_p (var))
3101 value = array_to_assignment_string (array_cell (var));
3107 value = value_cell (var);
3114 : mk_env_string (var->name, value, function_p(var));
3117 SAVE_EXPORTSTR (var, list[list_index]);
3124 if (array_p (var))
3248 list of var contexts whose head is shell_variables
3432 set_context (var)
3433 SHELL_VAR *var;
3435 return (var->context = variable_context);
3468 SHELL_VAR *var, *v;
3470 var = (SHELL_VAR *)data;
3472 if (tempvar_p (var) && (posixly_correct || (var->attributes & att_propagate)))
3475 v = bind_variable_internal (var->name, value_cell (var), shell_variables->table, 0, 0);
3477 var->attributes &= ~(att_tempvar|att_propagate);
3480 v->attributes |= var->attributes;
3483 stupidly_hack_special_variables (var->name); /* XXX */
3485 dispose_variable (var);
3550 SHELL_VAR *var, *v;
3552 var = (SHELL_VAR *)data;
3554 /* If a temp var had its export attribute set, or it's marked to be
3559 if (exported_p (var) || (var->attributes & att_propagate))
3561 if (tempvar_p (var) && exported_p (var) && (var->attributes & att_propagate))
3564 var->attributes &= ~att_tempvar; /* XXX */
3565 v = bind_variable_internal (var->name, value_cell (var), shell_variables->table, 0, 0);
3567 var->attributes &= ~att_propagate;
3568 v->attributes |= var->attributes;
3571 stupidly_hack_special_variables (var->name); /* XXX */
3573 dispose_variable (var);