int pformat(t_data *d, t_map *m)
{
char *s;
if (!ft_strstr(m->path, ".fdf"))
return (pclear(1, d, m, "! invalid map name"));
m->fd = open(m->path, O_RDONLY);
s = m->path + ft_strlen(MAP_DIR) - ((m->path[0] == '.') ? 0 : 2);
l1(1, s, "format verification");
if (m->fd < 0 || BUFF_SIZE < 1 || read(m->fd, m->read, 0) < 0)
return (pclear(1, d, m, "! cant read the map"));
if (!pformatcheck(m, (char *)NULL))
return (pclear(1, d, m, "! map format error"));
m->status = 2;
return (0);
}
/*
* rtfrmshell - back from shell, fix modes and return
*/
RETSIGTYPE
rtfrmshell(int sig)
{
signal(SIGCONT, SIG_DFL);
ttopen();
ttresize();
pclear(0, term.t_nrow);
pico_refresh(0, 1);
}
int pbuild(t_data *d, t_map *m)
{
char *s;
close(m->fd);
m->fd = open(m->path, O_RDONLY);
s = m->path + ft_strlen(MAP_DIR) - ((m->path[0] == '.') ? 0 : 2);
l1(1, s, "build int array");
if (m->fd < 0 || BUFF_SIZE < 1 || read(m->fd, m->read, 0) < 0)
return (pclear(1, d, m, "! cant read the map"));
if (!pbuildarray(m, (char *)NULL))
return (pclear(1, d, m, "! build int array error"));
close(m->fd);
m->status = -1;
pinit(m, 0, 0, (char *)NULL);
loop(1);
return (0);
}
//**********************************************************************************************************************
vector<string> GetCurrentCommand::setParameters(){
try {
CommandParameter pclear("clear", "String", "", "", "", "", "","",false,false); parameters.push_back(pclear);
CommandParameter pinputdir("inputdir", "String", "", "", "", "", "","",false,false); parameters.push_back(pinputdir);
CommandParameter poutputdir("outputdir", "String", "", "", "", "", "","",false,false); parameters.push_back(poutputdir);
vector<string> myArray;
for (int i = 0; i < parameters.size(); i++) { myArray.push_back(parameters[i].name); }
return myArray;
}
catch(exception& e) {
m->errorOut(e, "GetCurrentCommand", "setParameters");
exit(1);
}
}
/*
* abort_composer - ask the question here, then go quit or
* return FALSE
*/
int
abort_composer(int f, int n)
{
char *result;
result = "";
Pmaster->arm_winch_cleanup++;
if(Pmaster->canceltest){
if(((Pmaster->pine_flags & MDHDRONLY) && !any_header_changes())
|| (result = (*Pmaster->canceltest)(redraw_pico_for_callback))){
pico_all_done = COMP_CANCEL;
emlwrite(result, NULL);
Pmaster->arm_winch_cleanup--;
return(TRUE);
}
else{
/* TRANSLATORS: The user typed the Cancel command and was
asked to confirm that. Instead they canceled the cancel
command. */
emlwrite(_("Cancel Cancelled"), NULL);
curwp->w_flag |= WFMODE; /* and modeline so we */
sgarbk = TRUE; /* redraw the keymenu */
pclear(term.t_nrow-1, term.t_nrow);
Pmaster->arm_winch_cleanup--;
return(FALSE);
}
}
else switch(mlyesno_utf8(Pmaster->headents
? _("Cancel message (answering \"Yes\" will abandon your mail message)")
: (anycb() == FALSE)
? _("Cancel Edit (and abandon changes)")
: _("Cancel Edit"),
FALSE)){
case TRUE:
pico_all_done = COMP_CANCEL;
return(TRUE);
case ABORT:
emlwrite(_("\007Cancel Cancelled"), NULL);
break;
default:
mlerase();
}
return(FALSE);
}
//**********************************************************************************************************************
vector<string> SetCurrentCommand::setParameters(){
try {
CommandParameter pprocessors("processors", "Number", "", "1", "", "", "","",false,false,true); parameters.push_back(pprocessors);
CommandParameter pflow("flow", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(pflow);
CommandParameter pfile("file", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(pfile);
CommandParameter pbiom("biom", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(pbiom);
CommandParameter pphylip("phylip", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(pphylip);
CommandParameter pcolumn("column", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(pcolumn);
CommandParameter psummary("summary", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(psummary);
CommandParameter pfasta("fasta", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(pfasta);
CommandParameter pname("name", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(pname);
CommandParameter pgroup("group", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(pgroup);
CommandParameter plist("list", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(plist);
CommandParameter ptaxonomy("taxonomy", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(ptaxonomy);
CommandParameter pconstaxonomy("constaxonomy", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(pconstaxonomy);
CommandParameter pcontigsreport("contigsreport", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(pcontigsreport);
CommandParameter pqfile("qfile", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(pqfile);
CommandParameter paccnos("accnos", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(paccnos);
CommandParameter prabund("rabund", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(prabund);
CommandParameter psabund("sabund", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(psabund);
CommandParameter pdesign("design", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(pdesign);
CommandParameter porder("order", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(porder);
CommandParameter ptree("tree", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(ptree);
CommandParameter pshared("shared", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(pshared);
CommandParameter pordergroup("ordergroup", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(pordergroup);
CommandParameter pcount("count", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(pcount);
CommandParameter pcurrent("current", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(pcurrent);
CommandParameter prelabund("relabund", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(prelabund);
CommandParameter psff("sff", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(psff);
CommandParameter poligos("oligos", "InputTypes", "", "", "none", "none", "none","",false,false); parameters.push_back(poligos);
CommandParameter pclear("clear", "String", "", "", "", "", "","",false,false); parameters.push_back(pclear);
CommandParameter pseed("seed", "Number", "", "0", "", "", "","",false,false); parameters.push_back(pseed);
CommandParameter pinputdir("inputdir", "String", "", "", "", "", "","",false,false); parameters.push_back(pinputdir);
CommandParameter poutputdir("outputdir", "String", "", "", "", "", "","",false,false); parameters.push_back(poutputdir);
vector<string> myArray;
for (int i = 0; i < parameters.size(); i++) { myArray.push_back(parameters[i].name); }
return myArray;
}
catch(exception& e) {
m->errorOut(e, "SetCurrentCommand", "setParameters");
exit(1);
}
}
/*
* bktoshell - suspend and wait to be woken up
*/
int
bktoshell(int f, int n)
{
UCS z = CTRL | 'Z';
if(!(gmode&MDSSPD)){
unknown_command(z);
return(FALSE);
}
if(Pmaster){
if(!Pmaster->suspend){
unknown_command(z);
return(FALSE);
}
if((*Pmaster->suspend)() == NO_OP_COMMAND){
int rv;
if(km_popped){
term.t_mrow = 2;
curwp->w_ntrows -= 2;
}
clearcursor();
mlerase();
rv = (*Pmaster->showmsg)('x');
ttresize();
picosigs();
if(rv) /* Did showmsg corrupt the display? */
pico_refresh(0, 1); /* Yes, repaint */
mpresf = 1;
if(km_popped){
term.t_mrow = 0;
curwp->w_ntrows += 2;
}
}
else{
ttresize();
pclear(0, term.t_nrow);
pico_refresh(0, 1);
}
return(TRUE);
}
if(gmode&MDSPWN){
char *shell;
int dummy;
vttidy();
movecursor(0, 0);
(*term.t_eeop)();
printf("\n\n\nUse \"exit\" to return to Pi%s\n",
(gmode & MDBRONLY) ? "lot" : "co");
system((shell = (char *)getenv("SHELL")) ? shell : "/bin/csh");
rtfrmshell(dummy); /* fixup tty */
}
else {
movecursor(term.t_nrow-1, 0);
peeol();
movecursor(term.t_nrow, 0);
peeol();
movecursor(term.t_nrow, 0);
printf("\n\n\nUse \"fg\" to return to Pi%s\n",
(gmode & MDBRONLY) ? "lot" : "co");
ttclose();
movecursor(term.t_nrow, 0);
peeol();
(*term.t_flush)();
signal(SIGCONT, rtfrmshell); /* prepare to restart */
signal(SIGTSTP, SIG_DFL); /* prepare to stop */
kill(0, SIGTSTP);
}
return(TRUE);
}
/*
* Quit command. If an argument, always quit. Otherwise confirm if a buffer
* has been changed and not written out. Normally bound to "C-X C-C".
*/
int
wquit(int f, int n)
{
register int s;
if(Pmaster){
char *result = NULL;
int ret;
/* First, make sure there are no outstanding problems */
if(AttachError()){
emlwrite(_("\007Problem with attachments! Fix errors or delete attachments."), NULL);
return(FALSE);
}
#ifdef SPELLER
if(Pmaster->always_spell_check)
if(spell(0, 0) == -1)
sleep(3); /* problem, show error */
#endif
/*
* if we're not in header, show some of it as we verify sending...
*/
display_for_send();
packheader();
Pmaster->arm_winch_cleanup++;
if((!(Pmaster->pine_flags & MDHDRONLY) || any_header_changes())
&& (ret = (*Pmaster->exittest)(Pmaster->headents,
redraw_pico_for_callback,
Pmaster->allow_flowed_text,
&result))){
Pmaster->arm_winch_cleanup--;
if(ret == -1){
pico_all_done = COMP_CANCEL;
}
else{
if(sgarbf)
update();
lchange(WFHARD); /* set update flags... */
curwp->w_flag |= WFMODE; /* and modeline so we */
sgarbk = TRUE; /* redraw the keymenu */
pclear(term.t_nrow-2, term.t_nrow);
}
if(result && *result)
emlwrite(result, NULL);
}
else{
Pmaster->arm_winch_cleanup--;
pico_all_done = COMP_EXIT;
return(TRUE);
}
}
else{
if (f != FALSE /* Argument forces it. */
|| anycb() == FALSE /* All buffers clean. */
/* User says it's OK. */
/* TRANSLATORS: buffer is the in-memory copy of a file */
|| (s=mlyesno_utf8(_("Save modified buffer (ANSWERING \"No\" WILL DESTROY CHANGES)"), -1)) == FALSE) {
vttidy();
#if defined(USE_TERMCAP) || defined(USE_TERMINFO) || defined(VMS)
kbdestroy(kbesc);
#endif
exit(0);
}
if(s == TRUE){
if(filewrite(0,1) == TRUE)
wquit(1, 0);
}
else if(s == ABORT){
emlwrite(_("Exit cancelled"), NULL);
if(term.t_mrow == 0)
curwp->w_flag |= WFHARD; /* cause bottom 3 lines to paint */
}
return(s);
}
return(FALSE);
}
