自学教程：C++ CTRL函数代码示例

/* * getguess: *	Get another guess */voidgetguess(void){	int i;	int ch, uch;	bool correct;	leaveok(stdscr, FALSE);	for (;;) {		move(PROMPTY, PROMPTX + sizeof("Guess: "));		refresh();		ch = readch();		if (isalpha(ch)) {			if (isupper(ch))				ch = tolower(ch);			if (Guessed[ch - 'a'])				mvprintw(MESGY, MESGX, "Already guessed '%c'", ch);			else				break;		}		else if (ch == CTRL('D'))			die(0);		else			mvprintw(MESGY, MESGX, "Not a valid guess: '%s'",				unctrl(ch));	}	leaveok(stdscr, TRUE);	move(MESGY, MESGX);	clrtoeol();	Guessed[ch - 'a'] = TRUE;	correct = FALSE;	uch = toupper(ch);	for (i = 0; Word[i] != '/0'; i++) {		if (Word[i] == ch) {			Known[i] = ch;			correct = TRUE;		} else if (Word[i] == uch) {			Known[i] = uch;			correct = TRUE;		}	}	if (!correct)		Errors++;}

/* * get_line: *      Reads the next line up to '/n' or EOF.  Multiple spaces are *	compressed to one space; a space is inserted before a ',' */char *get_line(void){	size_t pos;	int c, oy, ox;	WINDOW *oscr;	oscr = stdscr;	stdscr = Msgwin;	getyx(stdscr, oy, ox);	refresh();	/* loop reading in the string, and put it in a temporary buffer */	for (pos = 0; (c = readchar()) != '/n'; clrtoeol(), refresh()) {			if (c == erasechar()) {	/* process erase character */				if (pos > 0) {					int i;					pos--;					for (i = strlen(unctrl(linebuf[pos])); i; i--)						addch('/b');				}				continue;			} else				if (c == killchar()) {	/* process kill							 * character */					pos = 0;					move(oy, ox);					continue;				} else					if (pos == 0 && c == ' ')						continue;		if (pos >= LINESIZE - 1 || !(isprint(c) || c == ' '))			putchar(CTRL('G'));		else {			if (islower(c))				c = toupper(c);			linebuf[pos++] = c;			addstr(unctrl(c));			Mpos++;		}	}	linebuf[pos] = '/0';	stdscr = oscr;	return (linebuf);}

/*  * called by the messages dispatcher when the file dialog is focused */static int wdg_file_get_msg(struct wdg_object *wo, int key, struct wdg_mouse_event *mouse){   WDG_WO_EXT(struct wdg_file_handle, ww);   /* handle the message */   switch (key) {               case KEY_MOUSE:         /* is the mouse event within our edges ? */         if (wenclose(ww->win, mouse->y, mouse->x)) {            wdg_set_focus(wo);            /* pass it to the menu */            if (wdg_file_driver(wo, key, mouse) != WDG_E_SUCCESS)               wdg_file_redraw(wo);         } else             return -WDG_E_NOTHANDLED;         break;      case KEY_RETURN:      case KEY_DOWN:      case KEY_UP:      case KEY_PPAGE:      case KEY_NPAGE:         /* move only if focused */         if (wo->flags & WDG_OBJ_FOCUSED) {            if (wdg_file_driver(wo, key, mouse) != WDG_E_SUCCESS)               wdg_file_redraw(wo);         } else            return -WDG_E_NOTHANDLED;         break;              case KEY_ESC:      case CTRL('Q'):         wdg_destroy_object(&wo);         wdg_redraw_all();         break;               /* message not handled */      default:         return -WDG_E_NOTHANDLED;         break;   }     return WDG_E_SUCCESS;}

/* * readch; *	Read a character from the input */intreadch(void){	int	cnt;	char	ch;	cnt = 0;	for (;;) {		if (read(STDIN_FILENO, &ch, sizeof ch) <= 0) {			if (++cnt > 100)				die(0);		} else			if (ch == CTRL('L')) {				wrefresh(curscr);				mvcur(0, 0, curscr->_cury, curscr->_curx);			} else				return ch;	}}

static void curses_manage_filters(void){   if (!wdg_filters) {      wdg_create_object(&wdg_filters, WDG_LIST, WDG_OBJ_WANT_FOCUS);   }   wdg_set_size(wdg_filters, 1, 2, -1, SYSMSG_WIN_SIZE - 1);   wdg_set_title(wdg_filters, "Select a filter...", WDG_ALIGN_LEFT);   wdg_set_color(wdg_filters, WDG_COLOR_SCREEN, EC_COLOR);   wdg_set_color(wdg_filters, WDG_COLOR_WINDOW, EC_COLOR);   wdg_set_color(wdg_filters, WDG_COLOR_BORDER, EC_COLOR_BORDER);   wdg_set_color(wdg_filters, WDG_COLOR_FOCUS, EC_COLOR_FOCUS);   wdg_set_color(wdg_filters, WDG_COLOR_TITLE, EC_COLOR_TITLE);   wdg_list_select_callback(wdg_filters, curses_select_filter);   wdg_add_destroy_key(wdg_filters, CTRL('Q'), NULL);   wdg_draw_object(wdg_filters);   wdg_set_focus(wdg_filters);   refresh_filter_list();}

/* * readch; *	Read a character from the input */readch(){	register int	cnt, r;	auto char	ch;	cnt = 0;	for (;;) {		if (read(0, &ch, sizeof ch) <= 0)		{			if (++cnt > 100)				die();		}		else if (ch == CTRL(L)) {			wrefresh(curscr);			mvcur(0, 0, curscr->_cury, curscr->_curx);		}		else			return ch;	}}

/* * readch; *	Read a character from the input */charreadch(void){	int cnt;	char ch;	int x, y;	cnt = 0;	for (;;) {		if (read(STDIN_FILENO, &ch, sizeof(ch)) <= 0) {			if (++cnt > 100)				die(0);		} else if (ch == CTRL('L')) {			wrefresh(curscr);			getyx(curscr, y, x);			mvcur(0, 0, y, x);		} else			return ch;	}}

CPaymentsPage::CPaymentsPage(CFCMDB& oDB, int nMemberID)	: CPropertyPage(IDD_PAYMENTS_PAGE)	, m_oDB(oDB)	, m_nMemberID(nMemberID)	, m_oTmpSubs(m_oDB.m_oMembers, true)	, m_lvGrid(this){	DEFINE_CTRL_TABLE		CTRL(IDC_PAYMENTS,	&m_lvGrid)	END_CTRL_TABLE	DEFINE_GRAVITY_TABLE		CTRLGRAV(IDC_PAYMENTS, LEFT_EDGE, TOP_EDGE, RIGHT_EDGE, BOTTOM_EDGE)	END_GRAVITY_TABLE	// Find all the payments for this member.	CResultSet oRS = m_oDB.m_oSubs.Select(CWhereCmp(CSubs::MEMBER_ID, CWhereCmp::EQUALS, m_nMemberID));	for (size_t i = 0; i < oRS.Count(); i++)	{		CRow& oCurRow = oRS[i];		CRow& oCpyRow = m_oTmpSubs.CreateRow();		CRow* pItmRow = m_oDB.m_oBalSheet.SelectRow(CBalSheet::ID, oCurRow[CSubs::ITEM_ID].ToValue());		ASSERT(pItmRow != NULL);		// Copy data.		oCpyRow[CTmpSubs::ITEM_ID]   = oCurRow[CSubs::ITEM_ID];		oCpyRow[CTmpSubs::MEMBER_ID] = oCurRow[CSubs::MEMBER_ID];		oCpyRow[CTmpSubs::FEE]       = oCurRow[CSubs::FEE];		oCpyRow[CTmpSubs::PAID]      = oCurRow[CSubs::PAID];		oCpyRow[CTmpSubs::ITEM_DATE] = pItmRow->Field(CBalSheet::DATE);		oCpyRow[CTmpSubs::ITEM_NAME] = pItmRow->Field(CBalSheet::NAME);		// Insert into tmp table.		m_oTmpSubs.InsertRow(oCpyRow, false);	}	// Initialise the grid.	m_lvGrid.Columns(NUM_COLUMNS, Columns);}

/* * mon_execute: *	Execute a single monitor command */voidmon_execute(PLAYER *pp){	char	ch;	ch = pp->p_cbuf[pp->p_ncount++];	switch (ch) {	  case CTRL('L'):		/* Redraw messed-up screen */		sendcom(pp, REDRAW);		break;	  case 'q':		/* Quit client */		(void) strlcpy(pp->p_death, "| Quit |", sizeof pp->p_death);		break;	  default:		/* Ignore everything else */		;	}}

static intgdb_getc(void){	int c;	do		c = gdb_cur->gdb_getc();	while (c == -1);	if (c == CTRL('C')) {		printf("Received ^C; trying to switch back to ddb./n");		if (kdb_dbbe_select("ddb") != 0)			printf("The ddb backend could not be selected./n");		else {			printf("using longjmp, hope it works!/n");			kdb_reenter();		}	}	return (c);}

/* * the auto-refreshing list of connections */void curses_show_connections(void){   DEBUG_MSG("curses_show_connections");   /* if the object already exist, set the focus to it */   if (wdg_connections) {      wdg_set_focus(wdg_connections);      return;   }      wdg_create_object(&wdg_connections, WDG_DYNLIST, WDG_OBJ_WANT_FOCUS);      wdg_set_title(wdg_connections, "Live connections:", WDG_ALIGN_LEFT);   wdg_set_size(wdg_connections, 1, 2, -1, SYSMSG_WIN_SIZE - 1);   wdg_set_color(wdg_connections, WDG_COLOR_SCREEN, EC_COLOR);   wdg_set_color(wdg_connections, WDG_COLOR_WINDOW, EC_COLOR);   wdg_set_color(wdg_connections, WDG_COLOR_BORDER, EC_COLOR_BORDER);   wdg_set_color(wdg_connections, WDG_COLOR_FOCUS, EC_COLOR_FOCUS);   wdg_set_color(wdg_connections, WDG_COLOR_TITLE, EC_COLOR_TITLE);   wdg_draw_object(wdg_connections);    wdg_set_focus(wdg_connections);   /* set the list print callback */   wdg_dynlist_print_callback(wdg_connections, conntrack_print);      /* set the select callback */   wdg_dynlist_select_callback(wdg_connections, curses_connection_data);     /* add the callback on idle to refresh the profile list */   wdg_add_idle_callback(refresh_connections);   /* add the destroy callback */   wdg_add_destroy_key(wdg_connections, CTRL('Q'), curses_kill_connections);   wdg_dynlist_add_callback(wdg_connections, 'd', curses_connection_detail);   wdg_dynlist_add_callback(wdg_connections, 'k', curses_connection_kill);   wdg_dynlist_add_callback(wdg_connections, 'x', curses_connection_purge);   wdg_dynlist_add_callback(wdg_connections, ' ', curses_connection_help);}

int main(){    fd_set fds;    /* Adjust the terminal slightly before the handler is installed. Disable     * canonical mode processing and set the input character time flag to be     * non-blocking.     */    if( tcgetattr(STDIN_FILENO, &term) < 0 ) {        perror("tcgetattr");        exit(1);    }    old_lflag = term.c_lflag;    old_vtime = term.c_cc[VTIME];    term.c_lflag &= ~ICANON;    term.c_cc[VTIME] = 1;    /* COMMENT LINE BELOW - see above */    if( tcsetattr(STDIN_FILENO, TCSANOW, &term) < 0 ) {        perror("tcsetattr");        exit(1);    }    rl_add_defun("change-prompt", change_prompt, CTRL('t'));    rl_callback_handler_install(get_prompt(), process_line);    while(1) {      FD_ZERO(&fds);      FD_SET(fileno(stdin), &fds);      if( select(FD_SETSIZE, &fds, NULL, NULL, NULL) < 0) {        perror("select");        exit(1);      }      if( FD_ISSET(fileno(stdin), &fds) ) {        rl_callback_read_char();      }    }}

/*  * called by the messages dispatcher when the menu is focused */static int wdg_input_get_msg(struct wdg_object *wo, int key, struct wdg_mouse_event *mouse){   WDG_WO_EXT(struct wdg_input_handle, ww);   WDG_DEBUG_MSG("keypress get msg: %d", key);      /* handle the message */   switch (key) {               case KEY_MOUSE:         /* is the mouse event within our edges ? */         if (wenclose(ww->win, mouse->y, mouse->x)) {            wdg_set_focus(wo);            /* redraw the menu */            wdg_input_redraw(wo);         } else {            return -WDG_E_NOTHANDLED;         }         break;            case KEY_ESC:      case CTRL('Q'):         wdg_destroy_object(&wo);         wdg_redraw_all();         return WDG_EFINISHED;         break;      /* message not handled */      default:         if (wo->flags & WDG_OBJ_FOCUSED) {            return wdg_input_driver(wo, key, mouse);         } else {            return -WDG_E_NOTHANDLED;         }         break;   }      return WDG_E_SUCCESS;}

/* * readchar: *	Reads and returns a character, checking for gross input errors */intreadchar(void){	int cnt;	char c;over:	cnt = 0;	while (read(STDIN_FILENO, &c, sizeof(char)) <= 0)		if (cnt++ > 100) {	/* if we are getting infinite EOFs */			bye();		/* quit the game */			exit(1);		}	if (c == CTRL('L')) {		wrefresh(curscr);		goto over;	}	if (c == '/r')		return ('/n');	else		return (c);}

/* * plugin management */static void curses_plugin_mgmt(void){   DEBUG_MSG("curses_plugin_mgmt");      /* create the array for the list widget */   curses_create_plug_array();      /* if the object already exist, set the focus to it */   if (wdg_plugin) {      /* set the new array */      wdg_list_set_elements(wdg_plugin, wdg_plugin_elements);      return;   }      wdg_create_object(&wdg_plugin, WDG_LIST, WDG_OBJ_WANT_FOCUS);      wdg_set_size(wdg_plugin, 1, 2, -1, SYSMSG_WIN_SIZE - 1);   wdg_set_title(wdg_plugin, "Select a plugin...", WDG_ALIGN_LEFT);   wdg_set_color(wdg_plugin, WDG_COLOR_SCREEN, EC_COLOR);   wdg_set_color(wdg_plugin, WDG_COLOR_WINDOW, EC_COLOR);   wdg_set_color(wdg_plugin, WDG_COLOR_BORDER, EC_COLOR_BORDER);   wdg_set_color(wdg_plugin, WDG_COLOR_FOCUS, EC_COLOR_FOCUS);   wdg_set_color(wdg_plugin, WDG_COLOR_TITLE, EC_COLOR_TITLE);     /* set the elements */   wdg_list_set_elements(wdg_plugin, wdg_plugin_elements);      /* add the destroy callback */   wdg_add_destroy_key(wdg_plugin, CTRL('Q'), curses_plug_destroy);     /* add the callback */   wdg_list_select_callback(wdg_plugin, curses_select_plugin);   wdg_list_add_callback(wdg_plugin, ' ', curses_plugin_help);        wdg_draw_object(wdg_plugin);      wdg_set_focus(wdg_plugin);}

voidtty_init (gboolean mouse_enable, gboolean is_xterm){    initscr ();#ifdef HAVE_ESCDELAY    /*     * If ncurses exports the ESCDELAY variable, it should be set to     * a low value, or you'll experience a delay in processing escape     * sequences that are recognized by mc (e.g. Esc-Esc).  On the other     * hand, making ESCDELAY too small can result in some sequences     * (e.g. cursor arrows) being reported as separate keys under heavy     * processor load, and this can be a problem if mc hasn't learned     * them in the "Learn Keys" dialog.  The value is in milliseconds.     */    ESCDELAY = 200;#endif /* HAVE_ESCDELAY */    /* use Ctrl-g to generate SIGINT */    cur_term->Nttyb.c_cc[VINTR] = CTRL ('g');   /* ^g */    /* disable SIGQUIT to allow use Ctrl-/ key */    cur_term->Nttyb.c_cc[VQUIT] = NULL_VALUE;    tcsetattr (cur_term->Filedes, TCSANOW, &cur_term->Nttyb);    tty_start_interrupt_key ();    if (!mouse_enable)        use_mouse_p = MOUSE_DISABLED;    tty_init_xterm_support (is_xterm);  /* do it before do_enter_ca_mode() call */    init_mouse ();    do_enter_ca_mode ();    tty_raw_mode ();    noecho ();    keypad (stdscr, TRUE);    nodelay (stdscr, FALSE);    tty_setup_sigwinch (sigwinch_handler);}

void curses_sniff_offline(void){   wdg_t *menu;      DEBUG_MSG("curses_sniff_offline");   wdg_create_object(&menu, WDG_MENU, WDG_OBJ_WANT_FOCUS | WDG_OBJ_ROOT_OBJECT);   wdg_set_title(menu, GBL_VERSION, WDG_ALIGN_RIGHT);   wdg_set_color(menu, WDG_COLOR_SCREEN, EC_COLOR);   wdg_set_color(menu, WDG_COLOR_WINDOW, EC_COLOR_MENU);   wdg_set_color(menu, WDG_COLOR_FOCUS, EC_COLOR_FOCUS);   wdg_set_color(menu, WDG_COLOR_TITLE, EC_COLOR_TITLE);   /* add the menu from the external files */   wdg_menu_add(menu, menu_start);   wdg_menu_add(menu, menu_targets);   wdg_menu_add(menu, menu_view);   wdg_menu_add(menu, menu_filters);   wdg_menu_add(menu, menu_logging);   wdg_menu_add(menu, menu_help);   wdg_draw_object(menu);      /* repaint the whole screen */   wdg_redraw_all();   wdg_set_focus(menu);   /* add the message flush callback */   wdg_add_idle_callback(curses_flush_msg);   /*     * give the control to the event dispatcher    * with the emergency exit CTRL + X    */   wdg_events_handler(CTRL('X'));   wdg_destroy_object(&menu);}

/* *	Get a yes or no answer to the given question.  Saves are * also allowed.  Return TRUE if the answer was yes, FALSE if no. */intgetyn(int promptno){	char	c;	Saved = FALSE;	for (;;) {		leaveok(Board, FALSE);		prompt(promptno);		clrtoeol();		refresh();		switch (c = readch()) {		  case 'n':	case 'N':			addch('N');			refresh();			leaveok(Board, TRUE);			return FALSE;		  case 'y':	case 'Y':			addch('Y');			refresh();			leaveok(Board, TRUE);			return TRUE;		  case 's':	case 'S':			addch('S');			refresh();			Saved = save();			continue;		  case CTRL('L'):			wrefresh(curscr);			break;		  default:			addstr(unctrl(c));			refresh();			putchar('/07');			break;		}	}}

/* * Called during normal debugger operation and during debugger faults. */static voidkaif_enter_mon(void){	char c;	for (;;) {		mdb_iob_printf(mdb.m_out,		    "%s: Do you really want to reboot? (y/n) ",		    mdb.m_pname);		mdb_iob_flush(mdb.m_out);		mdb_iob_clearlines(mdb.m_out);		c = kmdb_getchar();		if (c == 'n' || c == 'N' || c == CTRL('c'))			return;		else if (c == 'y' || c == 'Y') {			mdb_iob_printf(mdb.m_out, "Rebooting.../n");			kmdb_dpi_reboot();		}	}}

void setup_tty_attributes (int tty_fd){  struct termios tm;  /* set up tty attribute */  if (tcgetattr(tty_fd, &tm) < 0)    perror("Faild to tcgetattr");  else {    /* setup values from child_setup_tty() in emacs/src/sysdep.c */    tm.c_iflag &= ~(IUCLC | ISTRIP);    tm.c_iflag |= IGNCR;    tm.c_oflag &= ~(ONLCR | OLCUC | TAB3);    tm.c_oflag |= OPOST;    tm.c_lflag &= ~ECHO;    tm.c_lflag |= ISIG | ICANON;    tm.c_cc[VERASE] = _POSIX_VDISABLE;    tm.c_cc[VKILL] = _POSIX_VDISABLE;    tm.c_cc[VEOF] = CTRL('D');    if (tcsetattr(tty_fd, TCSANOW, &tm) < 0)      perror("Failed to tcsetattr");  }}

/* long-running function to get input */char *get_input(char *prefix) {    view_t *view=current_view();    /* write the prefix */    mvaddstr(view->height,0,prefix);    doupdate();    refresh();    /* read input */    char *buffer=(char *)malloc(MAX_INPUT_SIZE);    int c=getch(),i=0;    while(c!='/n' && c!='/r') {        if(c==CTRL('D'))            return 0; /* no input */        /* add the character to the screen */        addch(c);        doupdate(); /* and flush */        refresh();        /* add to our internal buffer */        buffer[i++]=c;        if(i==MAX_INPUT_SIZE)            return 0; /* FIXME throw actual error */        c=getch();    }    return buffer;}

/** Insert mode: accept characters and insert them.*  End with ^D or EIC*/void input(){   int c;   standout();   mvaddstr(LINES - 1, COLS - 20, "INPUT MODE");   standend();   move(row, col);   refresh();   for (;;)   {       c = getch();       if (c == CTRL('D') || c == KEY_EIC)           break;       insch(c);       move(row, ++col);       refresh();   }   move(LINES - 1, COLS - 20);   clrtoeol();   move(row, col);   refresh();}

rel_move(was_col,was_ln,new_col,new_ln){    extern int ochar();#ifndef HPUX_TERMCAP    extern char *BC ;#endif    if(new_ln >= t_lines  || new_col >= t_columns)      return ;    tc_col = new_col ;    tc_line = new_ln ;    if((new_col == 0) && (new_ln == was_ln+1)) {        ochar('/n') ;        if(was_col != 0)          ochar('/r') ;        return ;    }    if((new_col == 0) && (new_ln == was_ln)) {        if(was_col != 0)          ochar('/r') ;        return ;    }    if(was_col == new_col && was_ln == new_ln)      return ;    if(new_col == was_col - 1 && new_ln == was_ln) {#ifndef HPUX_TERMCAP        if(BC)          tputs(BC,1,ochar) ;        else#endif          ochar(CTRL('H'));        return ;    }        do_move(new_col,new_ln,ochar) ;}

/* * Determine the erase, interrupt, and kill characters from the terminfo * entry and command line and update their values in 'mode'. */voidset_control_chars(int erasechar, int intrchar, int killchar){	int bs_char;	if (key_backspace != NULL && key_backspace[1] == '/0')		bs_char = key_backspace[0];	else		bs_char = 0;		if (erasechar == 0 && bs_char != 0 && !over_strike)		erasechar = -1;	if (erasechar < 0)		erasechar = (bs_char != 0) ? bs_char : CTRL('h');	if (mode.c_cc[VERASE] == 0 || erasechar != 0)		 mode.c_cc[VERASE] = erasechar ? erasechar : CERASE;	if (mode.c_cc[VINTR] == 0 || intrchar != 0)		 mode.c_cc[VINTR] = intrchar ? intrchar : CINTR;	if (mode.c_cc[VKILL] == 0 || killchar != 0)		mode.c_cc[VKILL] = killchar ? killchar : CKILL;}

int more(char *filename, BOOL promptend){	FILE *fp;	int chkey;	int viewed, numbytes;	int i, lines;	int pageno, pagebreaks[MAXPAGE];	struct stat st;	char buf[512];	BOOL dojump = FALSE;	int jumpto = 0, dummy;	if ((fp = fopen(filename, "r")) == NULL)		return -1;	if (fstat(fileno(fp), &st) == -1)		return -1;	i = 0;	lines = 0;	viewed = 0;	pageno = 0;	pagebreaks[0] = 0;	clear(); 	/* read a line & process it until end of it */	while ((numbytes = readln(buf, sizeof(buf), fp)) != 0)	{		if (!dojump || (dojump && pageno < jumpto - 2))		{			/* sarek:06/09/2002:引言上色,修正加空白後的第二
C++ CTSTRING函数代码示例
C++ CTRACE函数代码示例