item base_list(item argl){
if (!is_null(argl)){
return cons(car(argl), base_list(cdr(argl)));
}
else
return nil();
}
static int sort_argv(t_list **list, t_arg *arg_list)
{
t_list *reg_list;
bool first;
bool alone;
first = 1;
if (*list != NULL)
print_fakelist(list);
if (*list != NULL)
{
reg_list = get_reglist(list);
if (reg_list != NULL)
{
print_ls(reg_list, arg_list);
ft_lstdel(®_list, free_list);
first = 0;
}
}
alone = 0;
if ((*list) != NULL && (*list)->next == NULL)
alone = 1;
if (*list != NULL)
return (base_list(*list, arg_list, alone, first));
else
return (0);
}
void PPTKBARBash::on_preview_button_clicked()
{
if (!file_exists(m_namelist_edit->text())) {
return;
}
QStringList dirprefix = dir_and_prefix(m_namelist_edit->text());
QString dir = dirprefix.at(0);
QString prefix = dirprefix.at(1);
QStringList namel = base_list(m_namelist_edit->text());
QStringList barlog = barlog_list(prefix, namel);
prefix += "_";
PPTK_settings->beginGroup("PPTK_GLOBAL");
QString ext = PPTK_settings->value("BARLOG_EXT").toString();
PPTK_settings->endGroup();
QStringList namel2;
for (int i = 1; i < namel.size(); ++i) {
QString runline = "\"cd " + dir + "; $prog "
+ prefix + namel.at(i - 1) + ".arc "
+ m_first_edit->text() + " "
+ m_last_edit->text() + " "
+ m_step_edit->text() + " "
+ prefix + namel.at(i) + ".arc "
+ m_first_edit->text() + " "
+ m_last_edit->text() + " "
+ m_step_edit->text() + " &> "
+ barlog.at(i - 1)
+ ext + " &\"";
namel2 << runline;
}
QString s = "";
s += "#!/bin/bash";
s += "\n";
s += "prog=" + m_bar_path_edit->text();
s += "\n";
for (int i = 0; i < namel2.size(); ++i) {
s += namel2.at(i);
s += "\n";
}
m_preview_edit->setPlainText(s);
m_previewed = true;
}
