mirror of
https://github.com/fish-shell/fish-shell.git
synced 2024-11-23 08:39:37 +08:00
Factor execution aspects from parser_t to parse_execution_context_t .
Still searching for best way to use new parser for execution.
This commit is contained in:
parent
b6af3e51ab
commit
5b1a532652
|
@ -65,6 +65,7 @@
|
|||
D033781115DC6D4C00A634BA /* completions in CopyFiles */ = {isa = PBXBuildFile; fileRef = D025C02715D1FEA100B9DB63 /* completions */; };
|
||||
D033781215DC6D5200A634BA /* functions in CopyFiles */ = {isa = PBXBuildFile; fileRef = D025C02815D1FEA100B9DB63 /* functions */; };
|
||||
D033781315DC6D5400A634BA /* tools in CopyFiles */ = {isa = PBXBuildFile; fileRef = D025C02915D1FEA100B9DB63 /* tools */; };
|
||||
D052D80B1868F7FC003ABCBD /* parse_execution.cpp in Sources */ = {isa = PBXBuildFile; fileRef = D052D8091868F7FC003ABCBD /* parse_execution.cpp */; };
|
||||
D07B247315BCC15700D4ADB4 /* add-shell in Resources */ = {isa = PBXBuildFile; fileRef = D07B247215BCC15700D4ADB4 /* add-shell */; };
|
||||
D07B247615BCC4BE00D4ADB4 /* install.sh in Resources */ = {isa = PBXBuildFile; fileRef = D07B247515BCC4BE00D4ADB4 /* install.sh */; };
|
||||
D07D266A15E33B86009E43F6 /* config.fish in CopyFiles */ = {isa = PBXBuildFile; fileRef = D0C4FD9415A7D7EE00212EF1 /* config.fish */; };
|
||||
|
@ -386,6 +387,8 @@
|
|||
D025C02915D1FEA100B9DB63 /* tools */ = {isa = PBXFileReference; lastKnownFileType = folder; name = tools; path = share/tools; sourceTree = "<group>"; };
|
||||
D031890915E36D9800D9CC39 /* base */ = {isa = PBXFileReference; lastKnownFileType = text; path = base; sourceTree = BUILT_PRODUCTS_DIR; };
|
||||
D03EE83814DF88B200FC7150 /* lru.h */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.c.h; path = lru.h; sourceTree = "<group>"; };
|
||||
D052D8091868F7FC003ABCBD /* parse_execution.cpp */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.cpp.cpp; path = parse_execution.cpp; sourceTree = "<group>"; };
|
||||
D052D80A1868F7FC003ABCBD /* parse_execution.h */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.c.h; path = parse_execution.h; sourceTree = "<group>"; };
|
||||
D07B247215BCC15700D4ADB4 /* add-shell */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; name = "add-shell"; path = "build_tools/osx_package_scripts/add-shell"; sourceTree = "<group>"; };
|
||||
D07B247515BCC4BE00D4ADB4 /* install.sh */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = text.script.sh; name = install.sh; path = osx/install.sh; sourceTree = "<group>"; };
|
||||
D0879AC616BF9A1A00E98E56 /* fish_term_icon.icns */ = {isa = PBXFileReference; lastKnownFileType = image.icns; name = fish_term_icon.icns; path = osx/fish_term_icon.icns; sourceTree = "<group>"; };
|
||||
|
@ -658,11 +661,13 @@
|
|||
D0A0853C13B3ACEE0099B651 /* exec.cpp */,
|
||||
D0A0850C13B3ACEE0099B651 /* expand.h */,
|
||||
D0A0853D13B3ACEE0099B651 /* expand.cpp */,
|
||||
D0D9B2B318555D92001AE279 /* parse_constants.h */,
|
||||
D0FE8EE6179CA8A5008C9F21 /* parse_productions.h */,
|
||||
D0FE8EE7179FB75F008C9F21 /* parse_productions.cpp */,
|
||||
D0D9B2B318555D92001AE279 /* parse_constants.h */,
|
||||
D0C52F361765284C00BFAB82 /* parse_tree.h */,
|
||||
D0C52F351765284C00BFAB82 /* parse_tree.cpp */,
|
||||
D052D80A1868F7FC003ABCBD /* parse_execution.h */,
|
||||
D052D8091868F7FC003ABCBD /* parse_execution.cpp */,
|
||||
D0A0850D13B3ACEE0099B651 /* fallback.h */,
|
||||
D0A0853E13B3ACEE0099B651 /* fallback.cpp */,
|
||||
D0A0850E13B3ACEE0099B651 /* function.h */,
|
||||
|
@ -1222,6 +1227,7 @@
|
|||
D0D02A83159839D5008E62BD /* iothread.cpp in Sources */,
|
||||
D0D02A84159839D5008E62BD /* parse_util.cpp in Sources */,
|
||||
D0D02A85159839D5008E62BD /* path.cpp in Sources */,
|
||||
D052D80B1868F7FC003ABCBD /* parse_execution.cpp in Sources */,
|
||||
D0D02A86159839D5008E62BD /* postfork.cpp in Sources */,
|
||||
D0D02A87159839D5008E62BD /* screen.cpp in Sources */,
|
||||
D0D02A88159839D5008E62BD /* signal.cpp in Sources */,
|
||||
|
|
601
parse_execution.cpp
Normal file
601
parse_execution.cpp
Normal file
|
@ -0,0 +1,601 @@
|
|||
/**\file parse_execution.cpp
|
||||
|
||||
Provides the "linkage" between a parse_node_tree_t and actual execution structures (job_t, etc.).
|
||||
|
||||
*/
|
||||
|
||||
#include "parse_execution.h"
|
||||
#include "complete.h"
|
||||
#include "builtin.h"
|
||||
#include "parser.h"
|
||||
#include "expand.h"
|
||||
#include "wutil.h"
|
||||
#include "path.h"
|
||||
|
||||
|
||||
parse_execution_context_t::parse_execution_context_t(const parse_node_tree_t &t, const wcstring s, parser_t *p) : tree(t), src(s), parser(p)
|
||||
{
|
||||
}
|
||||
|
||||
/* Utilities */
|
||||
|
||||
wcstring parse_execution_context_t::get_source(const parse_node_t &node) const
|
||||
{
|
||||
return node.get_source(this->src);
|
||||
}
|
||||
|
||||
const parse_node_t *parse_execution_context_t::get_child(const parse_node_t &parent, node_offset_t which, parse_token_type_t expected_type)
|
||||
{
|
||||
return this->tree.get_child(parent, which, expected_type);
|
||||
}
|
||||
|
||||
node_offset_t parse_execution_context_t::get_offset(const parse_node_t &node) const
|
||||
{
|
||||
/* Pointer arithmetic, very hackish */
|
||||
const parse_node_t *addr = &node;
|
||||
const parse_node_t *base = &this->tree.at(0);
|
||||
assert(addr >= base);
|
||||
node_offset_t offset = addr - base;
|
||||
assert(offset < this->tree.size());
|
||||
return offset;
|
||||
}
|
||||
|
||||
/* Stack manipulation */
|
||||
|
||||
void parse_execution_context_t::stack_push(const parse_node_t *job_or_job_list, statement_completion_handler_t completion_handler, const parse_node_t *node)
|
||||
{
|
||||
const struct parse_execution_stack_element_t elem = {job_or_job_list, completion_handler, node};
|
||||
job_stack.push_back(elem);
|
||||
}
|
||||
|
||||
process_t *parse_execution_context_t::create_for_process(job_t *job, const parse_node_t &header, const parse_node_t &statement)
|
||||
{
|
||||
assert(header.type == symbol_for_header);
|
||||
const wcstring for_variable = get_source(*get_child(header, 1, parse_token_type_string));
|
||||
const parse_node_t &arg_list = *get_child(header, 3, symbol_argument_list);
|
||||
|
||||
for_block_t *fb = new for_block_t(for_variable);
|
||||
fb->sequence = this->determine_arguments(arg_list, NULL);
|
||||
fb->node_offset = this->get_offset(statement);
|
||||
parser->push_block(fb);
|
||||
return NULL;
|
||||
}
|
||||
|
||||
process_t *parse_execution_context_t::create_while_process(job_t *job, const parse_node_t &header, const parse_node_t &statement)
|
||||
{
|
||||
assert(header.type == symbol_while_header);
|
||||
while_block_t *wb = new while_block_t();
|
||||
wb->status = WHILE_TEST_FIRST;
|
||||
wb->node_offset = this->get_offset(statement);
|
||||
parser->push_block(wb);
|
||||
return NULL;
|
||||
}
|
||||
|
||||
process_t *parse_execution_context_t::create_begin_process(job_t *job, const parse_node_t &header, const parse_node_t &statement)
|
||||
{
|
||||
assert(header.type == symbol_begin_header);
|
||||
scope_block_t *bb = new scope_block_t(BEGIN);
|
||||
parser->push_block(bb);
|
||||
return NULL;
|
||||
}
|
||||
|
||||
bool parse_execution_context_t::append_error(const parse_node_t &node, const wchar_t *fmt, ...)
|
||||
{
|
||||
parse_error_t error;
|
||||
error.source_start = node.source_start;
|
||||
error.source_length = node.source_length;
|
||||
error.code = parse_error_syntax; //hackish
|
||||
|
||||
va_list va;
|
||||
va_start(va, fmt);
|
||||
error.text = vformat_string(fmt, va);
|
||||
va_end(va);
|
||||
|
||||
this->errors.push_back(error);
|
||||
return true;
|
||||
}
|
||||
|
||||
process_t *parse_execution_context_t::create_plain_process(job_t *job, const parse_node_t &statement)
|
||||
{
|
||||
/* Get the decoration */
|
||||
assert(statement.type == symbol_plain_statement);
|
||||
|
||||
/* Get the command. We expect to always get it here. */
|
||||
wcstring cmd;
|
||||
bool got_cmd = tree.command_for_plain_statement(statement, src, &cmd);
|
||||
assert(got_cmd);
|
||||
|
||||
/* Expand it as a command */
|
||||
bool expanded = expand_one(cmd, EXPAND_SKIP_CMDSUBST | EXPAND_SKIP_VARIABLES);
|
||||
if (! expanded)
|
||||
{
|
||||
append_error(statement, ILLEGAL_CMD_ERR_MSG, cmd.c_str());
|
||||
return 0;
|
||||
}
|
||||
|
||||
/* The list of arguments. The command is the first argument. TODO: count hack */
|
||||
const parse_node_t *unmatched_wildcard = NULL;
|
||||
wcstring_list_t argument_list = this->determine_arguments(statement, &unmatched_wildcard);
|
||||
argument_list.insert(argument_list.begin(), cmd);
|
||||
|
||||
/* We were not able to expand any wildcards. Here is the first one that failed */
|
||||
if (unmatched_wildcard != NULL)
|
||||
{
|
||||
job_set_flag(job, JOB_WILDCARD_ERROR, 1);
|
||||
proc_set_last_status(STATUS_UNMATCHED_WILDCARD);
|
||||
append_error(*unmatched_wildcard, WILDCARD_ERR_MSG, unmatched_wildcard->get_source(src).c_str());
|
||||
}
|
||||
|
||||
/* The set of IO redirections that we construct for the process */
|
||||
const io_chain_t process_io_chain = this->determine_io_chain(statement);
|
||||
|
||||
/* Determine the process type, which depends on the statement decoration (command, builtin, etc) */
|
||||
enum parse_statement_decoration_t decoration = tree.decoration_for_plain_statement(statement);
|
||||
enum process_type_t process_type = EXTERNAL;
|
||||
|
||||
/* exec hack */
|
||||
if (decoration != parse_statement_decoration_command && cmd == L"exec")
|
||||
{
|
||||
/* Either 'builtin exec' or just plain 'exec', and definitely not 'command exec'. Note we don't allow overriding exec with a function. */
|
||||
process_type = INTERNAL_EXEC;
|
||||
}
|
||||
else if (decoration == parse_statement_decoration_command)
|
||||
{
|
||||
/* Always a command */
|
||||
process_type = EXTERNAL;
|
||||
}
|
||||
else if (decoration == parse_statement_decoration_builtin)
|
||||
{
|
||||
/* What happens if this builtin is not valid? */
|
||||
process_type = INTERNAL_BUILTIN;
|
||||
}
|
||||
else if (function_exists(cmd))
|
||||
{
|
||||
process_type = INTERNAL_FUNCTION;
|
||||
}
|
||||
else if (builtin_exists(cmd))
|
||||
{
|
||||
process_type = INTERNAL_BUILTIN;
|
||||
}
|
||||
else
|
||||
{
|
||||
process_type = EXTERNAL;
|
||||
}
|
||||
|
||||
wcstring actual_cmd;
|
||||
if (process_type == EXTERNAL)
|
||||
{
|
||||
/* Determine the actual command. Need to support implicit cd here */
|
||||
bool has_command = path_get_path(cmd, &actual_cmd);
|
||||
|
||||
if (! has_command)
|
||||
{
|
||||
/* TODO: support fish_command_not_found, implicit cd, etc. here */
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
/* Return the process */
|
||||
process_t *result = new process_t();
|
||||
result->type = process_type;
|
||||
result->set_argv(argument_list);
|
||||
result->set_io_chain(process_io_chain);
|
||||
result->actual_cmd = actual_cmd;
|
||||
return result;
|
||||
}
|
||||
|
||||
/* Determine the list of arguments, expanding stuff. If we have a wildcard and none could be expanded, return the unexpandable wildcard node by reference. */
|
||||
wcstring_list_t parse_execution_context_t::determine_arguments(const parse_node_t &parent, const parse_node_t **out_unmatched_wildcard_node)
|
||||
{
|
||||
wcstring_list_t argument_list;
|
||||
|
||||
/* Whether we failed to match any wildcards, and succeeded in matching any wildcards */
|
||||
bool unmatched_wildcard = false, matched_wildcard = false;
|
||||
|
||||
/* First node that failed to expand as a wildcard (if any) */
|
||||
const parse_node_t *unmatched_wildcard_node = NULL;
|
||||
|
||||
/* Get all argument nodes underneath the statement */
|
||||
const parse_node_tree_t::parse_node_list_t argument_nodes = tree.find_nodes(parent, symbol_argument);
|
||||
argument_list.reserve(argument_nodes.size());
|
||||
for (size_t i=0; i < argument_nodes.size(); i++)
|
||||
{
|
||||
const parse_node_t &arg_node = *argument_nodes.at(i);
|
||||
|
||||
/* Expect all arguments to have source */
|
||||
assert(arg_node.has_source());
|
||||
const wcstring arg_str = arg_node.get_source(src);
|
||||
|
||||
/* Expand this string */
|
||||
std::vector<completion_t> arg_expanded;
|
||||
int expand_ret = expand_string(arg_str, arg_expanded, 0);
|
||||
switch (expand_ret)
|
||||
{
|
||||
case EXPAND_ERROR:
|
||||
{
|
||||
this->append_error(arg_node,
|
||||
_(L"Could not expand string '%ls'"),
|
||||
arg_str.c_str());
|
||||
break;
|
||||
}
|
||||
|
||||
case EXPAND_WILDCARD_NO_MATCH:
|
||||
{
|
||||
/* Store the node that failed to expand */
|
||||
unmatched_wildcard = true;
|
||||
if (! unmatched_wildcard_node)
|
||||
{
|
||||
unmatched_wildcard_node = &arg_node;
|
||||
}
|
||||
break;
|
||||
}
|
||||
|
||||
case EXPAND_WILDCARD_MATCH:
|
||||
{
|
||||
matched_wildcard = true;
|
||||
break;
|
||||
}
|
||||
|
||||
case EXPAND_OK:
|
||||
{
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
/* Now copy over any expanded arguments */
|
||||
for (size_t i=0; i < arg_expanded.size(); i++)
|
||||
{
|
||||
argument_list.push_back(arg_expanded.at(i).completion);
|
||||
}
|
||||
}
|
||||
|
||||
/* Return if we had a wildcard problem */
|
||||
if (unmatched_wildcard && ! matched_wildcard)
|
||||
{
|
||||
*out_unmatched_wildcard_node = unmatched_wildcard_node;
|
||||
}
|
||||
|
||||
return argument_list;
|
||||
}
|
||||
|
||||
io_chain_t parse_execution_context_t::determine_io_chain(const parse_node_t &statement)
|
||||
{
|
||||
io_chain_t result;
|
||||
|
||||
/* Get all redirection nodes underneath the statement */
|
||||
const parse_node_tree_t::parse_node_list_t redirect_nodes = tree.find_nodes(statement, symbol_redirection);
|
||||
for (size_t i=0; i < redirect_nodes.size(); i++)
|
||||
{
|
||||
const parse_node_t &redirect_node = *redirect_nodes.at(i);
|
||||
|
||||
int source_fd = -1; /* source fd */
|
||||
wcstring target; /* file path or target fd */
|
||||
enum token_type redirect_type = tree.type_for_redirection(redirect_node, src, &source_fd, &target);
|
||||
|
||||
/* PCA: I can't justify this EXPAND_SKIP_VARIABLES flag. It was like this when I got here. */
|
||||
bool target_expanded = expand_one(target, no_exec ? EXPAND_SKIP_VARIABLES : 0);
|
||||
if (! target_expanded || target.empty())
|
||||
{
|
||||
/* Should improve this error message */
|
||||
this->append_error(redirect_node,
|
||||
_(L"Invalid redirection target: %ls"),
|
||||
target.c_str());
|
||||
}
|
||||
|
||||
|
||||
/* Generate the actual IO redirection */
|
||||
shared_ptr<io_data_t> new_io;
|
||||
assert(redirect_type != TOK_NONE);
|
||||
switch (redirect_type)
|
||||
{
|
||||
case TOK_REDIRECT_FD:
|
||||
{
|
||||
if (target == L"-")
|
||||
{
|
||||
new_io.reset(new io_close_t(source_fd));
|
||||
}
|
||||
else
|
||||
{
|
||||
wchar_t *end = NULL;
|
||||
errno = 0;
|
||||
int old_fd = fish_wcstoi(target.c_str(), &end, 10);
|
||||
if (old_fd < 0 || errno || *end)
|
||||
{
|
||||
this->append_error(redirect_node,
|
||||
_(L"Requested redirection to something that is not a file descriptor %ls"),
|
||||
target.c_str());
|
||||
}
|
||||
else
|
||||
{
|
||||
new_io.reset(new io_fd_t(source_fd, old_fd));
|
||||
}
|
||||
}
|
||||
break;
|
||||
}
|
||||
|
||||
case TOK_REDIRECT_OUT:
|
||||
case TOK_REDIRECT_APPEND:
|
||||
case TOK_REDIRECT_IN:
|
||||
case TOK_REDIRECT_NOCLOB:
|
||||
{
|
||||
int oflags = oflags_for_redirection_type(redirect_type);
|
||||
io_file_t *new_io_file = new io_file_t(source_fd, target, oflags);
|
||||
new_io.reset(new_io_file);
|
||||
break;
|
||||
}
|
||||
|
||||
default:
|
||||
{
|
||||
// Should be unreachable
|
||||
fprintf(stderr, "Unexpected redirection type %ld. aborting.\n", (long)redirect_type);
|
||||
PARSER_DIE();
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
/* Append the new_io if we got one */
|
||||
if (new_io.get() != NULL)
|
||||
{
|
||||
result.push_back(new_io);
|
||||
}
|
||||
}
|
||||
return result;
|
||||
}
|
||||
|
||||
process_t *parse_execution_context_t::create_boolean_process(job_t *job, const parse_node_t &bool_statement)
|
||||
{
|
||||
// Handle a boolean statement
|
||||
bool skip_job = false;
|
||||
assert(bool_statement.type == symbol_boolean_statement);
|
||||
switch (bool_statement.production_idx)
|
||||
{
|
||||
// These magic numbers correspond to productions for boolean_statement
|
||||
case 0:
|
||||
// AND. Skip if the last job failed.
|
||||
skip_job = (proc_get_last_status() != 0);
|
||||
break;
|
||||
|
||||
case 1:
|
||||
// OR. Skip if the last job succeeded.
|
||||
skip_job = (proc_get_last_status() == 0);
|
||||
break;
|
||||
|
||||
case 2:
|
||||
// NOT. Negate it.
|
||||
job_set_flag(job, JOB_NEGATE, !job_get_flag(job, JOB_NEGATE));
|
||||
break;
|
||||
|
||||
default:
|
||||
{
|
||||
fprintf(stderr, "Unexpected production in boolean statement\n");
|
||||
PARSER_DIE();
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
process_t *result = NULL;
|
||||
if (! skip_job)
|
||||
{
|
||||
const parse_node_t &subject = *tree.get_child(bool_statement, 1, symbol_statement);
|
||||
result = this->create_job_process(job, subject);
|
||||
}
|
||||
return result;
|
||||
}
|
||||
|
||||
|
||||
/* Returns a process_t allocated with new. It's the caller's responsibility to delete it (!) */
|
||||
process_t *parse_execution_context_t::create_job_process(job_t *job, const parse_node_t &statement_node)
|
||||
{
|
||||
assert(statement_node.type == symbol_statement);
|
||||
assert(statement_node.child_count == 1);
|
||||
|
||||
// Get the "specific statement" which is boolean / block / if / switch / decorated
|
||||
const parse_node_t &specific_statement = *get_child(statement_node, 0);
|
||||
|
||||
process_t *result = NULL;
|
||||
|
||||
switch (specific_statement.type)
|
||||
{
|
||||
case symbol_boolean_statement:
|
||||
{
|
||||
result = this->create_boolean_process(job, specific_statement);
|
||||
break;
|
||||
}
|
||||
|
||||
case symbol_block_statement:
|
||||
{
|
||||
const parse_node_t &header = *get_child(specific_statement, 0, symbol_block_header);
|
||||
const parse_node_t &specific_header = *get_child(header, 0);
|
||||
switch (specific_header.type)
|
||||
{
|
||||
case symbol_for_header:
|
||||
result = this->create_for_process(job, specific_header, specific_statement);
|
||||
break;
|
||||
|
||||
case symbol_while_header:
|
||||
result = this->create_while_process(job, specific_header, specific_statement);
|
||||
break;
|
||||
|
||||
case symbol_function_header:
|
||||
// No process is associated with creating a function
|
||||
// TODO: create the darn function!
|
||||
result = NULL;
|
||||
break;
|
||||
|
||||
case symbol_begin_header:
|
||||
result = this->create_begin_process(job, specific_header, specific_statement);
|
||||
break;
|
||||
|
||||
default:
|
||||
fprintf(stderr, "Unexpected header type\n");
|
||||
PARSER_DIE();
|
||||
break;
|
||||
}
|
||||
break;
|
||||
}
|
||||
|
||||
case symbol_decorated_statement:
|
||||
{
|
||||
const parse_node_t &plain_statement = tree.find_child(specific_statement, symbol_plain_statement);
|
||||
result = this->create_plain_process(job, plain_statement);
|
||||
break;
|
||||
}
|
||||
|
||||
default:
|
||||
fprintf(stderr, "'%ls' not handled by new parser yet\n", specific_statement.describe().c_str());
|
||||
}
|
||||
|
||||
return result;
|
||||
}
|
||||
|
||||
|
||||
void parse_execution_context_t::eval_job(job_t *j, const parse_node_t &job_node)
|
||||
{
|
||||
assert(job_node.type == symbol_job);
|
||||
|
||||
/* Track whether we had an error */
|
||||
bool process_errored = false;
|
||||
|
||||
/* Tell the job what its command is */
|
||||
j->set_command(get_source(job_node));
|
||||
|
||||
/* We are going ot construct process_t structures for every statement in the job. Get the first statement. */
|
||||
const parse_node_t *statement_node = get_child(job_node, 0, symbol_statement);
|
||||
assert(statement_node != NULL);
|
||||
|
||||
/* Create the process (may fail!) */
|
||||
j->first_process = this->create_job_process(j, *statement_node);
|
||||
if (j->first_process == NULL)
|
||||
process_errored = true;
|
||||
|
||||
/* Construct process_ts for job continuations (pipelines), by walking the list until we hit the terminal (empty) job continuationf */
|
||||
const parse_node_t *job_cont = get_child(job_node, 1, symbol_job_continuation);
|
||||
process_t *last_process = j->first_process;
|
||||
while (! process_errored && job_cont != NULL && job_cont->child_count > 0)
|
||||
{
|
||||
assert(job_cont->type == symbol_job_continuation);
|
||||
|
||||
/* Get the statement node and make a process from it */
|
||||
const parse_node_t *statement_node = get_child(*job_cont, 1, symbol_statement);
|
||||
assert(statement_node != NULL);
|
||||
|
||||
/* Store the new process (and maybe with an error) */
|
||||
last_process->next = this->create_job_process(j, *statement_node);
|
||||
if (last_process->next == NULL)
|
||||
process_errored = true;
|
||||
|
||||
/* Link the process and get the next continuation */
|
||||
last_process = last_process->next;
|
||||
job_cont = get_child(*job_cont, 2, symbol_job_continuation);
|
||||
}
|
||||
}
|
||||
|
||||
void parse_execution_context_t::eval_1_job(const parse_node_t &job_node)
|
||||
{
|
||||
// Get terminal modes
|
||||
struct termios tmodes = {};
|
||||
if (get_is_interactive())
|
||||
{
|
||||
if (tcgetattr(STDIN_FILENO, &tmodes))
|
||||
{
|
||||
// need real error handling here
|
||||
wperror(L"tcgetattr");
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
/* Profiling support */
|
||||
long long t1 = 0, t2 = 0, t3 = 0;
|
||||
const bool do_profile = profile;
|
||||
profile_item_t *profile_item = NULL;
|
||||
if (do_profile)
|
||||
{
|
||||
profile_item = new profile_item_t();
|
||||
profile_item->skipped = 1;
|
||||
profile_items.push_back(profile_item);
|
||||
t1 = get_time();
|
||||
}
|
||||
|
||||
job_t *j = parser->job_create();
|
||||
job_set_flag(j, JOB_FOREGROUND, 1);
|
||||
job_set_flag(j, JOB_TERMINAL, job_get_flag(j, JOB_CONTROL));
|
||||
job_set_flag(j, JOB_TERMINAL, job_get_flag(j, JOB_CONTROL) \
|
||||
&& (!is_subshell && !is_event));
|
||||
job_set_flag(j, JOB_SKIP_NOTIFICATION, is_subshell \
|
||||
|| is_block \
|
||||
|| is_event \
|
||||
|| (!get_is_interactive()));
|
||||
|
||||
parser->current_block()->job = j;
|
||||
|
||||
this->eval_job(j, job_node);
|
||||
|
||||
}
|
||||
|
||||
void parse_execution_context_t::eval_next_stack_elem()
|
||||
{
|
||||
// Pop the next thing to do
|
||||
assert(! job_stack.empty());
|
||||
const parse_execution_stack_element_t elem = job_stack.back();
|
||||
job_stack.pop_back();
|
||||
|
||||
assert(elem.job_or_job_list->type == symbol_job || elem.job_or_job_list->type == symbol_job_list);
|
||||
|
||||
if (elem.job_or_job_list->type == symbol_job)
|
||||
{
|
||||
const parse_node_t *job = elem.job_or_job_list;
|
||||
this->eval_1_job(*job);
|
||||
}
|
||||
else
|
||||
{
|
||||
const parse_node_t *job_list = elem.job_or_job_list;
|
||||
while (job_list != NULL)
|
||||
{
|
||||
assert(job_list->type == symbol_job_list);
|
||||
|
||||
// These correspond to the three productions of job_list
|
||||
// Try pulling out a job
|
||||
const parse_node_t *job = NULL;
|
||||
switch (job_list->production_idx)
|
||||
{
|
||||
case 0: // empty
|
||||
job_list = NULL;
|
||||
break;
|
||||
|
||||
case 1: //job, job_list
|
||||
job = get_child(*job_list, 0, symbol_job);
|
||||
job_list = get_child(*job_list, 1, symbol_job_list);
|
||||
break;
|
||||
|
||||
case 2: //blank line, job_list
|
||||
job = NULL;
|
||||
job_list = get_child(*job_list, 1, symbol_job_list);
|
||||
break;
|
||||
|
||||
default: //if we get here, it means more productions have been added to job_list, which is bad
|
||||
PARSER_DIE();
|
||||
}
|
||||
|
||||
if (job != NULL)
|
||||
{
|
||||
this->eval_1_job(*job);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
/* Invoke any completion handler */
|
||||
if (elem.completion_handler)
|
||||
{
|
||||
assert(elem.node != NULL);
|
||||
(this->*elem.completion_handler)(*elem.node);
|
||||
}
|
||||
}
|
||||
|
||||
void parse_execution_context_t::eval_job_list(const parse_node_t &job_node)
|
||||
{
|
||||
this->stack_push(&job_node, NULL, NULL);
|
||||
while (! job_stack.empty())
|
||||
{
|
||||
this->eval_next_stack_elem();
|
||||
}
|
||||
}
|
76
parse_execution.h
Normal file
76
parse_execution.h
Normal file
|
@ -0,0 +1,76 @@
|
|||
/**\file parse_execution.h
|
||||
|
||||
Provides the "linkage" between a parse_node_tree_t and actual execution structures (job_t, etc.).
|
||||
*/
|
||||
|
||||
#ifndef FISH_PARSE_EXECUTION_H
|
||||
#define FISH_PARSE_EXECUTION_H
|
||||
|
||||
#include "config.h"
|
||||
#include "util.h"
|
||||
#include "parse_tree.h"
|
||||
#include "proc.h"
|
||||
|
||||
class job_t;
|
||||
struct profile_item_t;
|
||||
|
||||
class parse_execution_context_t
|
||||
{
|
||||
private:
|
||||
const parse_node_tree_t tree;
|
||||
const wcstring src;
|
||||
parser_t * const parser;
|
||||
parse_error_list_t errors;
|
||||
|
||||
std::vector<profile_item_t*> profile_items;
|
||||
|
||||
/* We maintain a stack of job lists to be executed, and something to do after the execution is finished. This is a pointer to member function that takes a node, a status, and the statement that was executed */
|
||||
typedef void (parse_execution_context_t::*statement_completion_handler_t)(const parse_node_t &node);
|
||||
|
||||
struct parse_execution_stack_element_t
|
||||
{
|
||||
// These point into our tree, which is immutable
|
||||
const parse_node_t *job_or_job_list;
|
||||
statement_completion_handler_t completion_handler;
|
||||
const parse_node_t *node;
|
||||
};
|
||||
std::vector<parse_execution_stack_element_t> job_stack;
|
||||
|
||||
void stack_push(const parse_node_t *job_or_job_list, statement_completion_handler_t completion_handler, const parse_node_t *node);
|
||||
|
||||
/* No copying allowed */
|
||||
parse_execution_context_t(const parse_execution_context_t&);
|
||||
parse_execution_context_t& operator=(const parse_execution_context_t&);
|
||||
|
||||
/* Report an error. Always returns true. */
|
||||
bool append_error(const parse_node_t &node, const wchar_t *fmt, ...);
|
||||
|
||||
wcstring get_source(const parse_node_t &node) const;
|
||||
const parse_node_t *get_child(const parse_node_t &parent, node_offset_t which, parse_token_type_t expected_type = token_type_invalid);
|
||||
|
||||
node_offset_t get_offset(const parse_node_t &node) const;
|
||||
|
||||
process_t *create_job_process(job_t *job, const parse_node_t &statement_node);
|
||||
process_t *create_boolean_process(job_t *job, const parse_node_t &bool_statement);
|
||||
process_t *create_for_process(job_t *job, const parse_node_t &header, const parse_node_t &statement);
|
||||
process_t *create_while_process(job_t *job, const parse_node_t &header, const parse_node_t &statement);
|
||||
process_t *create_begin_process(job_t *job, const parse_node_t &header, const parse_node_t &statement);
|
||||
process_t *create_plain_process(job_t *job, const parse_node_t &statement);
|
||||
|
||||
wcstring_list_t determine_arguments(const parse_node_t &parent, const parse_node_t **out_unmatched_wildcard_node);
|
||||
io_chain_t determine_io_chain(const parse_node_t &statement);
|
||||
|
||||
void eval_1_job(const parse_node_t &job_node);
|
||||
void eval_job(job_t *j, const parse_node_t &job_node);
|
||||
|
||||
void eval_next_stack_elem();
|
||||
|
||||
public:
|
||||
parse_execution_context_t(const parse_node_tree_t &t, const wcstring s, parser_t *p);
|
||||
|
||||
void eval_job_list(const parse_node_t &job_node);
|
||||
|
||||
};
|
||||
|
||||
|
||||
#endif
|
|
@ -302,13 +302,13 @@ RESOLVE(block_header)
|
|||
|
||||
PRODUCTIONS(for_header) =
|
||||
{
|
||||
{KEYWORD(parse_keyword_for), parse_token_type_string, KEYWORD(parse_keyword_in), symbol_arguments_or_redirections_list}
|
||||
{KEYWORD(parse_keyword_for), parse_token_type_string, KEYWORD(parse_keyword_in), symbol_argument_list}
|
||||
};
|
||||
RESOLVE_ONLY(for_header)
|
||||
|
||||
PRODUCTIONS(while_header) =
|
||||
{
|
||||
{KEYWORD(parse_keyword_while), symbol_statement}
|
||||
{KEYWORD(parse_keyword_while), symbol_job}
|
||||
};
|
||||
RESOLVE_ONLY(while_header)
|
||||
|
||||
|
|
|
@ -241,8 +241,8 @@ public:
|
|||
|
||||
block_statement = block_header <TOK_END> job_list end_command arguments_or_redirections_list
|
||||
block_header = for_header | while_header | function_header | begin_header
|
||||
for_header = FOR var_name IN arguments_or_redirections_list
|
||||
while_header = WHILE statement
|
||||
for_header = FOR var_name IN argument_list
|
||||
while_header = WHILE job
|
||||
begin_header = BEGIN
|
||||
function_header = FUNCTION function_name argument_list
|
||||
|
||||
|
|
|
@ -2772,7 +2772,7 @@ void parser_t::eval_job(const parse_node_t &job_node, const parser_context_t &ct
|
|||
/* Tell the job what its command is */
|
||||
j->set_command(job_node.get_source(ctx.src));
|
||||
|
||||
/* Construct process_t structures for every statement in the job */
|
||||
/* We are going to construct process_t structures for every statement in the job. Get the first statement. */
|
||||
const parse_node_t *statement_node = ctx.tree.get_child(job_node, 0, symbol_statement);
|
||||
assert(statement_node != NULL);
|
||||
|
||||
|
@ -3616,6 +3616,7 @@ block_t::block_t(block_type_t t) :
|
|||
skip(),
|
||||
had_command(),
|
||||
tok_pos(),
|
||||
node_offset(NODE_OFFSET_INVALID),
|
||||
loop_status(),
|
||||
job(),
|
||||
src_filename(),
|
||||
|
|
3
parser.h
3
parser.h
|
@ -95,6 +95,8 @@ public:
|
|||
bool skip; /**< Whether execution of the commands in this block should be skipped */
|
||||
bool had_command; /**< Set to non-zero once a command has been executed in this block */
|
||||
int tok_pos; /**< The start index of the block */
|
||||
|
||||
node_offset_t node_offset; /* Offset of the node */
|
||||
|
||||
/** Status for the current loop block. Can be any of the values from the loop_status enum. */
|
||||
int loop_status;
|
||||
|
@ -277,6 +279,7 @@ struct parser_context_t
|
|||
|
||||
class parser_t
|
||||
{
|
||||
friend class parse_execution_context_t;
|
||||
private:
|
||||
enum parser_type_t parser_type;
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user