int
one_try_want_to(char *question, int dflt, int on_ctrl_C, HelpType help, int flags)
{
char *q2;
int rv;
size_t l;
l = strlen(question) + 5;
q2 = fs_get((l+1) * sizeof(char));
strncpy(q2, question, l);
q2[l] = '\0';
(void) utf8_truncate(q2, ps_global->ttyo->screen_cols - 6);
strncat(q2, "? ", l+1 - strlen(q2) - 1);
q2[l] = '\0';
rv = radio_buttons(q2,
(ps_global->ttyo->screen_rows > 4) ? - FOOTER_ROWS(ps_global) : -1,
yorn, dflt, on_ctrl_C, help, flags | RB_ONE_TRY);
fs_give((void **) &q2);
return(rv);
}
/*
* This should really be part of radio_buttons itself, I suppose. It was
* easier to do it this way. This is for when there are more than 12
* possible commands. We could have all the radio_buttons calls call this
* instead of radio_buttons, or rename this to radio_buttons.
*
* Radio_buttons is limited to 10 visible commands unless there is no Help,
* in which case it is 11 visible commands.
* Double_radio_buttons is limited to 16 visible commands because it uses
* slots 3 and 4 for readability and the OTHER CMD.
*/
int
double_radio_buttons(char *prompt, int line, ESCKEY_S *esc_list, int dflt, int on_ctrl_C, HelpType help_text, int flags)
{
ESCKEY_S *list = NULL, *list1 = NULL, *list2 = NULL;
int i = 0, j;
int v = OTHER_RETURN_VAL, listnum = 0;
#ifdef _WINDOWS
if(mswin_usedialog())
return(radio_buttons(prompt, line, esc_list, dflt, on_ctrl_C,
help_text, flags));
#endif
/* check to see if it will all fit in one */
while(esc_list && esc_list[i].ch != -1)
i++;
i++; /* for ^C */
if(help_text != NO_HELP)
i++;
if(i <= 12)
return(radio_buttons(prompt, line, esc_list, dflt, on_ctrl_C,
help_text, flags));
/*
* Won't fit, split it into two lists.
*
* We can fit at most 8 items in the visible list. The rest of
* the commands have to be invisible. Each of list1 and list2 should
* have no more than 8 visible (name != "" || label != "") items.
*/
list1 = (ESCKEY_S *)fs_get((KEYS_PER_LIST+1) * sizeof(*list1));
memset(list1, 0, (KEYS_PER_LIST+1) * sizeof(*list1));
list2 = (ESCKEY_S *)fs_get((KEYS_PER_LIST+1) * sizeof(*list2));
memset(list2, 0, (KEYS_PER_LIST+1) * sizeof(*list2));
for(j=0,i=0; esc_list[i].ch != -1 && j < KEYS_PER_LIST; j++,i++)
list1[j] = esc_list[i];
list1[j].ch = -1;
for(j=0; esc_list[i].ch != -1 && j < KEYS_PER_LIST; j++,i++)
list2[j] = esc_list[i];
list2[j].ch = -1;
list = construct_combined_esclist(list1, list2);
while(v == OTHER_RETURN_VAL){
v = radio_buttons(prompt,line,list,dflt,on_ctrl_C,help_text,flags);
if(v == OTHER_RETURN_VAL){
fs_give((void **) &list);
listnum = 1 - listnum;
list = construct_combined_esclist(listnum ? list2 : list1,
listnum ? list1 : list2);
}
}
if(list)
fs_give((void **) &list);
if(list1)
fs_give((void **) &list1);
if(list2)
fs_give((void **) &list2);
return(v);
}
/*----------------------------------------------------------------------
Open the printer
Args: desc -- Description of item to print. Should have one trailing blank.
Return value: < 0 is a failure.
0 a success.
This does most of the work of popen so we can save the standard output of the
command we execute and send it back to the user.
----*/
int
open_printer(char *desc)
{
#ifndef _WINDOWS
char command[201], prompt[200];
int cmd, rc, just_one;
char *p, *init, *nick;
char aname[100], wname[100];
char *printer;
int done = 0, i, lastprinter, cur_printer = 0;
HelpType help;
char **list;
static ESCKEY_S ekey[] = {
/* TRANSLATORS: these are command labels for printing screen */
{'y', 'y', "Y", N_("Yes")},
{'n', 'n', "N", N_("No")},
/* TRANSLATORS: go to Previous Printer in list */
{ctrl('P'), 10, "^P", N_("Prev Printer")},
{ctrl('N'), 11, "^N", N_("Next Printer")},
{-2, 0, NULL, NULL},
/* TRANSLATORS: use Custom Print command */
{'c', 'c', "C", N_("CustomPrint")},
{KEY_UP, 10, "", ""},
{KEY_DOWN, 11, "", ""},
{-1, 0, NULL, NULL}};
#define PREV_KEY 2
#define NEXT_KEY 3
#define CUSTOM_KEY 5
#define UP_KEY 6
#define DOWN_KEY 7
trailer = NULL;
init = NULL;
nick = NULL;
command[sizeof(command)-1] = '\0';
if(ps_global->VAR_PRINTER == NULL){
q_status_message(SM_ORDER | SM_DING, 3, 5,
"No printer has been chosen. Use SETUP on main menu to make choice.");
return(-1);
}
/* Is there just one print command available? */
just_one = (ps_global->printer_category!=3&&ps_global->printer_category!=2)
|| (ps_global->printer_category == 2
&& !(ps_global->VAR_STANDARD_PRINTER
&& ps_global->VAR_STANDARD_PRINTER[0]
&& ps_global->VAR_STANDARD_PRINTER[1]))
|| (ps_global->printer_category == 3
&& !(ps_global->VAR_PERSONAL_PRINT_COMMAND
&& ps_global->VAR_PERSONAL_PRINT_COMMAND[0]
&& ps_global->VAR_PERSONAL_PRINT_COMMAND[1]));
if(F_ON(F_CUSTOM_PRINT, ps_global))
ekey[CUSTOM_KEY].ch = 'c'; /* turn this key on */
else
ekey[CUSTOM_KEY].ch = -2; /* turn this key off */
if(just_one){
ekey[PREV_KEY].ch = -2; /* turn these keys off */
ekey[NEXT_KEY].ch = -2;
ekey[UP_KEY].ch = -2;
ekey[DOWN_KEY].ch = -2;
}
else{
ekey[PREV_KEY].ch = ctrl('P'); /* turn these keys on */
ekey[NEXT_KEY].ch = ctrl('N');
ekey[UP_KEY].ch = KEY_UP;
ekey[DOWN_KEY].ch = KEY_DOWN;
/*
* count how many printers in list and find the default in the list
*/
if(ps_global->printer_category == 2)
list = ps_global->VAR_STANDARD_PRINTER;
else
list = ps_global->VAR_PERSONAL_PRINT_COMMAND;
for(i = 0; list[i]; i++)
if(strcmp(ps_global->VAR_PRINTER, list[i]) == 0)
cur_printer = i;
lastprinter = i - 1;
}
help = NO_HELP;
ps_global->mangled_footer = 1;
while(!done){
if(init)
fs_give((void **)&init);
if(trailer)
fs_give((void **)&trailer);
if(just_one)
printer = ps_global->VAR_PRINTER;
else
printer = list[cur_printer];
parse_printer(printer, &nick, &p, &init, &trailer, NULL, NULL);
strncpy(command, p, sizeof(command)-1);
command[sizeof(command)-1] = '\0';
fs_give((void **)&p);
/* TRANSLATORS: Print something1 using something2.
For example, Print configuration using printer three. */
snprintf(prompt, sizeof(prompt), _("Print %s using \"%s\" ? "),
desc ? desc : "",
*nick ? nick : command);
prompt[sizeof(prompt)-1] = '\0';
fs_give((void **)&nick);
cmd = radio_buttons(prompt, -FOOTER_ROWS(ps_global),
ekey, 'y', 'x', help, RB_NORM);
switch(cmd){
case 'y':
q_status_message1(SM_ORDER, 0, 9,
"Printing with command \"%s\"", command);
done++;
break;
case 10:
cur_printer = (cur_printer>0)
? (cur_printer-1)
: lastprinter;
break;
case 11:
cur_printer = (cur_printer<lastprinter)
? (cur_printer+1)
: 0;
break;
case 'n':
case 'x':
done++;
break;
case 'c':
done++;
break;
default:
break;
}
}
if(cmd == 'c'){
if(init)
fs_give((void **)&init);
if(trailer)
fs_give((void **)&trailer);
snprintf(prompt, sizeof(prompt), "Enter custom command : ");
prompt[sizeof(prompt)-1] = '\0';
command[0] = '\0';
rc = 1;
help = NO_HELP;
while(rc){
int flags = OE_APPEND_CURRENT;
rc = optionally_enter(command, -FOOTER_ROWS(ps_global), 0,
sizeof(command), prompt, NULL, help, &flags);
if(rc == 1){
cmd = 'x';
rc = 0;
}
else if(rc == 3)
help = (help == NO_HELP) ? h_custom_print : NO_HELP;
else if(rc == 0){
removing_trailing_white_space(command);
removing_leading_white_space(command);
q_status_message1(SM_ORDER, 0, 9,
"Printing with command \"%s\"", command);
}
}
}
if(cmd == 'x' || cmd == 'n'){
q_status_message(SM_ORDER, 0, 2, "Print cancelled");
if(init)
fs_give((void **)&init);
if(trailer)
fs_give((void **)&trailer);
return(-1);
}
display_message('x');
ps_global->print = (PRINT_S *)fs_get(sizeof(PRINT_S));
memset(ps_global->print, 0, sizeof(PRINT_S));
strncpy(aname, ANSI_PRINTER, sizeof(aname)-1);
aname[sizeof(aname)-1] = '\0';
strncat(aname, "-no-formfeed", sizeof(aname)-strlen(aname)-1);
strncpy(wname, WYSE_PRINTER, sizeof(wname)-1);
wname[sizeof(wname)-1] = '\0';
strncat(wname, "-no-formfeed", sizeof(wname)-strlen(wname)-1);
if(strucmp(command, ANSI_PRINTER) == 0
|| strucmp(command, aname) == 0
|| strucmp(command, WYSE_PRINTER) == 0
|| strucmp(command, wname) == 0){
/*----------- Attached printer ---------*/
q_status_message(SM_ORDER, 0, 9,
"Printing to attached desktop printer...");
display_message('x');
xonxoff_proc(1); /* make sure XON/XOFF used */
crlf_proc(1); /* AND LF->CR xlation */
if(strucmp(command, ANSI_PRINTER) == 0
|| strucmp(command, aname) == 0){
fputs("\033[5i", stdout);
ansi_off = 1;
}
else{
ansi_off = 0;
printf("%c", 18); /* aux on for wyse60,
Chuck Everett <*****@*****.**> */
}
ps_global->print->fp = stdout;
if(strucmp(command, ANSI_PRINTER) == 0
|| strucmp(command, WYSE_PRINTER) == 0){
/* put formfeed at the end of the trailer string */
if(trailer){
int len = strlen(trailer);
fs_resize((void **)&trailer, len+2);
trailer[len] = '\f';
trailer[len+1] = '\0';
}
else
trailer = cpystr("\f");
}
}
else{
/*----------- Print by forking off a UNIX command ------------*/
dprint((4, "Printing using command \"%s\"\n",
command ? command : "?"));
ps_global->print->result = temp_nam(NULL, "pine_prt");
if(ps_global->print->result &&
(ps_global->print->pipe = open_system_pipe(command,
&ps_global->print->result, NULL,
PIPE_WRITE | PIPE_STDERR, 0,
pipe_callback, NULL))){
ps_global->print->fp = ps_global->print->pipe->out.f;
}
else{
if(ps_global->print->result){
our_unlink(ps_global->print->result);
fs_give((void **)&ps_global->print->result);
}
q_status_message1(SM_ORDER | SM_DING, 3, 4,
"Error opening printer: %s",
error_description(errno));
dprint((2, "Error popening printer \"%s\"\n",
error_description(errno)));
if(init)
fs_give((void **)&init);
if(trailer)
fs_give((void **)&trailer);
return(-1);
}
}
ps_global->print->err = 0;
if(init){
if(*init)
fputs(init, ps_global->print->fp);
fs_give((void **)&init);
}
cb.cbuf[0] = '\0';
cb.cbufp = cb.cbuf;
cb.cbufend = cb.cbuf;
#else /* _WINDOWS */
int status;
LPTSTR desclpt = NULL;
if(desc)
desclpt = utf8_to_lptstr(desc);
if (status = mswin_print_ready (0, desclpt)) {
q_status_message1(SM_ORDER | SM_DING, 3, 4,
"Error starting print job: %s",
mswin_print_error(status));
if(desclpt)
fs_give((void **) &desclpt);
return(-1);
}
if(desclpt)
fs_give((void **) &desclpt);
q_status_message(SM_ORDER, 0, 9, "Printing to windows printer...");
display_message('x');
/* init print control structure */
ps_global->print = (PRINT_S *)fs_get(sizeof(PRINT_S));
memset(ps_global->print, 0, sizeof(PRINT_S));
ps_global->print->err = 0;
#endif /* _WINDOWS */
return(0);
}
/*----------------------------------------------------------------------
Ask a yes/no question in the status line
Args: question -- string to prompt user with
dflt -- The default answer to the question (should probably
be y or n)
on_ctrl_C -- Answer returned on ^C
help -- Two line help text
flags -- Flags to modify behavior
WT_FLUSH_IN - Discard pending input.
WT_SEQ_SENSITIVE - Caller is sensitive to sequence
number changes caused by
unsolicited expunges while we're
viewing a message.
Result: Messes up the status line,
returns y, n, dflt, on_ctrl_C, or SEQ_EXCEPTION
---*/
int
want_to(char *question, int dflt, int on_ctrl_C, HelpType help, int flags)
{
char *free_this = NULL, *free_this2 = NULL, *prompt;
int rv, width;
size_t len;
if(!ps_global->ttyo)
return(pre_screen_config_want_to(question, dflt, on_ctrl_C));
#ifdef _WINDOWS
if (mswin_usedialog ()) {
mswin_flush ();
switch (mswin_yesno_utf8 (question)) {
default:
case 0: return (on_ctrl_C);
case 1: return ('y');
case 2: return ('n');
}
}
#endif
/*----
One problem with adding the (y/n) here is that shrinking the
screen while in radio_buttons() will cause it to get chopped
off. It would be better to truncate the question passed in
here and leave the full "(y/n) [x] : " on.
----*/
len = strlen(question) + 4;
free_this = (char *) fs_get(len);
width = utf8_width(question);
if(width + 2 < ps_global->ttyo->screen_cols){
snprintf(free_this, len, "%s? ", question);
free_this[len-1] = '\0';
prompt = free_this;
}
else if(width + 1 < ps_global->ttyo->screen_cols){
snprintf(free_this, len, "%s?", question);
free_this[len-1] = '\0';
prompt = free_this;
}
else if(width < ps_global->ttyo->screen_cols){
snprintf(free_this, len, "%s", question);
free_this[len-1] = '\0';
prompt = free_this;
}
else{
free_this2 = (char *) fs_get(len);
snprintf(free_this2, len, "%s? ", question);
prompt = short_str(free_this2, free_this, len, ps_global->ttyo->screen_cols-1, MidDots);
}
if(on_ctrl_C == 'n') /* don't ever let cancel == 'n' */
on_ctrl_C = 0;
rv = radio_buttons(prompt,
(ps_global->ttyo->screen_rows > 4) ? - FOOTER_ROWS(ps_global) : -1,
yorn, dflt, on_ctrl_C, help, flags);
if(free_this)
fs_give((void **) &free_this);
if(free_this2)
fs_give((void **) &free_this2);
return(rv);
}
int
context_config_shuffle(struct pine *ps, CONF_S **cl)
{
char prompt[256];
int n = 0, cmd, i1, i2, count = 0, insert_num, starting_varmem;
int news_problem = 0, deefault = 0;
ESCKEY_S ekey[3];
CONTEXT_S *cur_ctxt, *other_ctxt;
char *tmp, **lval, **lval1, **lval2;
struct variable *cur_var, *other_var;
if(!((*cl)->d.c.ct && (*cl)->var))
return(0);
/* enable UP? */
if((*cl)->d.c.ct->prev && !((*cl)->d.c.ct->prev->use & CNTXT_INHERIT)){
/*
* Don't allow shuffling news collection up to become
* the primary collection. That would happen if prev is primary
* and this one is news.
*/
if((*cl)->d.c.ct->prev->use & CNTXT_SAVEDFLT &&
(*cl)->d.c.ct->use & CNTXT_NEWS)
news_problem++;
else{
ekey[n].ch = 'u';
ekey[n].rval = 'u';
ekey[n].name = "U";
ekey[n++].label = N_("Up");
deefault = 'u';
}
}
/* enable DOWN? */
if((*cl)->d.c.ct->next && !((*cl)->d.c.ct->next->use & CNTXT_INHERIT)){
/*
* Don't allow shuffling down past news collection if this
* is primary collection.
*/
if((*cl)->d.c.ct->use & CNTXT_SAVEDFLT &&
(*cl)->d.c.ct->next->use & CNTXT_NEWS)
news_problem++;
else{
ekey[n].ch = 'd';
ekey[n].rval = 'd';
ekey[n].name = "D";
ekey[n++].label = N_("Down");
if(!deefault)
deefault = 'd';
}
}
if(n){
ekey[n].ch = -1;
snprintf(prompt, sizeof(prompt), _("Shuffle selected context %s%s%s? "),
(ekey[0].ch == 'u') ? _("UP") : "",
(n > 1) ? " or " : "",
(ekey[0].ch == 'd' || n > 1) ? _("DOWN") : "");
prompt[sizeof(prompt)-1] = '\0';
cmd = radio_buttons(prompt, -FOOTER_ROWS(ps), ekey,
deefault, 'x', NO_HELP, RB_NORM);
switch(cmd){
case 'x':
default:
cmd_cancelled("Shuffle");
return(0);
case 'u':
case 'd':
break;
}
/*
* This is complicated by the fact that there are two
* vars involved, the folder-collections and the news-collections.
* We may have to shuffle across collections.
*/
cur_ctxt = (*cl)->d.c.ct;
if(cmd == 'd')
other_ctxt = (*cl)->d.c.ct->next;
else if(cmd == 'u')
other_ctxt = (*cl)->d.c.ct->prev;
cur_var = cur_ctxt->var.v;
other_var = other_ctxt->var.v;
/* swap elements of config var */
if(cur_var == other_var){
i1 = cur_ctxt->var.i;
i2 = other_ctxt->var.i;
lval = LVAL(cur_var, ew);
if(lval){
tmp = lval[i1];
lval[i1] = lval[i2];
lval[i2] = tmp;
}
starting_varmem = i2;
}
else{
/* swap into the other_var */
i1 = cur_ctxt->var.i;
i2 = other_ctxt->var.i;
lval1 = LVAL(cur_var, ew);
lval2 = LVAL(other_var, ew);
/* count */
for(count = 0; lval2 && lval2[count]; count++)
;
if(cmd == 'd')
insert_num = count ? 1 : 0;
else{
insert_num = count ? count - 1 : count;
}
starting_varmem = insert_num;
if(ccs_var_insert(ps,lval1[i1],other_var,lval2,insert_num)){
if(!ccs_var_delete(ps, cur_ctxt)){
q_status_message(SM_ORDER|SM_DING, 3, 3,
_("Error deleting shuffled context"));
return(0);
}
}
else{
q_status_message(SM_ORDER, 3, 3,
_("Trouble shuffling, cancelled"));
return(0);
}
}
(*cl)->d.c.cs->starting_var = other_var;
(*cl)->d.c.cs->starting_varmem = starting_varmem;
q_status_message(SM_ORDER, 0, 3, _("Collections shuffled"));
return(15);
}
if(news_problem)
/* TRANSLATORS: Sorry, can't move news group collections above email collections */
q_status_message(SM_ORDER, 0, 3, _("Sorry, cannot Shuffle news to top"));
else
q_status_message(SM_ORDER, 0, 3, _("Sorry, nothing to Shuffle"));
return(0);
}
