File:  [ELWIX - Embedded LightWeight unIX -] / embedaddon / quagga / tests / heavy.c
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs - revision graph
Tue Feb 21 17:26:11 2012 UTC (12 years, 4 months ago) by misho
Branches: quagga, MAIN
CVS tags: v0_99_22p0, v0_99_22, v0_99_21, v0_99_20_1, v0_99_20, HEAD
quagga

    1: /*
    2:  * $Id: heavy.c,v 1.1.1.1 2012/02/21 17:26:11 misho Exp $
    3:  *
    4:  * This file is part of Quagga.
    5:  *
    6:  * Quagga is free software; you can redistribute it and/or modify it
    7:  * under the terms of the GNU General Public License as published by the
    8:  * Free Software Foundation; either version 2, or (at your option) any
    9:  * later version.
   10:  *
   11:  * Quagga is distributed in the hope that it will be useful, but
   12:  * WITHOUT ANY WARRANTY; without even the implied warranty of
   13:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   14:  * General Public License for more details.
   15:  *
   16:  * You should have received a copy of the GNU General Public License
   17:  * along with Quagga; see the file COPYING.  If not, write to the Free
   18:  * Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
   19:  * 02111-1307, USA.
   20:  */
   21: 
   22: /* This programme shows the effects of 'heavy' long-running functions
   23:  * on the cooperative threading model.
   24:  *
   25:  * Run it with a config file containing 'password whatever', telnet to it
   26:  * (it defaults to port 4000) and enter the 'clear foo string' command.
   27:  * then type whatever and observe that the vty interface is unresponsive
   28:  * for quite a period of time, due to the clear_something command
   29:  * taking a very long time to complete.
   30:  */
   31: #include <zebra.h>
   32: 
   33: #include "thread.h"
   34: #include "vty.h"
   35: #include "command.h"
   36: #include "memory.h"
   37: #include <math.h>
   38: 
   39: enum
   40: {
   41:   ITERS_FIRST = 0,
   42:   ITERS_ERR = 100,
   43:   ITERS_LATER = 400,
   44:   ITERS_PRINT = 10,
   45:   ITERS_MAX = 1000,
   46: };
   47: 
   48: static void
   49: slow_func (struct vty *vty, const char *str, const int i)
   50: {
   51:   double x = 1;
   52:   int j;
   53:   
   54:   for (j = 0; j < 300; j++)
   55:     x += sin(x)*j;
   56:   
   57:   if ((i % ITERS_LATER) == 0)
   58:     printf ("%s: %d, temporary error, save this somehow and do it later..\n", 
   59:             __func__, i);
   60:   
   61:   if ((i % ITERS_ERR) == 0)
   62:     printf ("%s: hard error\n", __func__);
   63:   
   64:   if ((i % ITERS_PRINT) == 0)
   65:     printf ("%s did %d, x = %g%s", str, i, x, VTY_NEWLINE);  
   66: }
   67: 
   68: static void
   69: clear_something (struct vty *vty, const char *str)
   70: {
   71:   int i;
   72:   
   73:   /* this could be like iterating through 150k of route_table 
   74:    * or worse, iterating through a list of peers, to bgp_stop them with
   75:    * each having 150k route tables to process...
   76:    */
   77:   for (i = ITERS_FIRST; i < ITERS_MAX; i++)
   78:     slow_func (vty, str, i);
   79: }
   80: 
   81: DEFUN (clear_foo,
   82:        clear_foo_cmd,
   83:        "clear foo .LINE",
   84:        "clear command\n"
   85:        "arbitrary string\n")
   86: {
   87:   char *str;
   88:   if (!argc)
   89:     {
   90:       vty_out (vty, "%% string argument required%s", VTY_NEWLINE);
   91:       return CMD_WARNING;
   92:     }
   93:   
   94:   str = argv_concat (argv, argc, 0);
   95:   
   96:   clear_something (vty, str);
   97:   XFREE (MTYPE_TMP, str);
   98:   return CMD_SUCCESS;
   99: }
  100: 
  101: static void
  102: slow_vty_init()
  103: {
  104:   install_element (VIEW_NODE, &clear_foo_cmd);
  105: }
  106: 
  107: void
  108: test_init()
  109: {
  110:   slow_vty_init();
  111: }

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>