Subversion Repositories shark

/*

 * Project: S.Ha.R.K.

 *

 * Coordinators:

 *   Giorgio Buttazzo    <giorgio@sssup.it>

 *   Paolo Gai           <pj@gandalf.sssup.it>

 *

 * Authors     :

 *   Paolo Gai           <pj@gandalf.sssup.it>

 *   (see the web pages for full authors list)

 *

 * ReTiS Lab (Scuola Superiore S.Anna - Pisa - Italy)

 *

 * http://www.sssup.it

 * http://retis.sssup.it

 * http://shark.sssup.it

 */

/*

 ------------

 CVS :        $Id: testiq.c,v 1.1.1.1 2004-05-24 17:54:50 giacomo Exp $

 File:        $File$

 Revision:    $Revision: 1.1.1.1 $

 Last update: $Date: 2004-05-24 17:54:50 $

 ------------

 The purpose of this test is to show that two budgets with different

 period and budgets schedules correctly.

 2 never ending tasks are involved

 This test cannot compile because of the fact that QUEUE and QQUEUE

 types does not exist anymore!

*/

/*

 * Copyright (C) 2002 Paolo Gai

 *

 * This program is free software; you can redistribute it and/or modify

 * it under the terms of the GNU General Public License as published by

 * the Free Software Foundation; either version 2 of the License, or

 * (at your option) any later version.

 *

 * This program is distributed in the hope that it will be useful,

 * but WITHOUT ANY WARRANTY; without even the implied warranty of

 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

 * GNU General Public License for more details.

 *

 * You should have received a copy of the GNU General Public License

 * along with this program; if not, write to the Free Software

 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

 *

 */

#include "kernel/kern.h"

#include "modules/edf.h"

#include "modules/cbs.h"

#include "cbsstar.h"

#include "edfstar.h"

#include "modules/rr.h"

#include "modules/dummy.h"

#include "modules/sem.h"

#include "modules/hartport.h"

#include "modules/cabs.h"

#include "drivers/keyb.h"

// --------------------------------------------------

// --------------------------------------------------

// Init Part

// --------------------------------------------------

// --------------------------------------------------

/*+ sysyem tick in us +*/

#define TICK 0

/*+ RR tick in us +*/

#define RRTICK 10000

TIME __kernel_register_levels__(void *arg)

{

  struct multiboot_info *mb = (struct multiboot_info *)arg;

  clear();

  EDF_register_level(EDF_ENABLE_ALL);

  RR_register_level(RRTICK, RR_MAIN_YES, mb);

  dummy_register_level();

  // for the keyboard...

  CBS_register_level(CBS_ENABLE_ALL, 0);

  SEM_register_module();

  CABS_register_module();

  return TICK;

}

TASK __init__(void *arg)

{

  struct multiboot_info *mb = (struct multiboot_info *)arg;

  KEYB_PARMS kparms = BASE_KEYB;

  HARTPORT_init();

  //keyb_def_ctrlC(kparms, NULL);

  //keyb_def_map(kparms,itaMap);

  KEYB_init(&kparms);

  __call_main__(mb);

  return (void *)0;

}

// --------------------------------------------------

// --------------------------------------------------

// The Test

// --------------------------------------------------

// --------------------------------------------------

#include <kernel/kern.h>

#include <drivers/keyb.h>

#include "iqueue.h"

sem_t s;

PID p2,p3,p4;

void *star(void *arg)

{

  int j;

  TIME last[5];

  QUEUE i = NIL;

  IQUEUE ii;

  q_timespec_insert(p2,&i);

  q_timespec_insert(p3,&i);

  iq_init(&ii,NULL,0);

  *iq_query_timespec(p2,&ii) = proc_table[p2].timespec_priority;

  *iq_query_timespec(p3,&ii) = proc_table[p3].timespec_priority;

  *iq_query_timespec(p4,&ii) = proc_table[p4].timespec_priority;

  iq_timespec_insert(p2,&ii);

  iq_timespec_insert(p3,&ii);

  cprintf("p2=%ld.%ld\n",proc_table[p2].timespec_priority.tv_sec,proc_table[p2].timespec_priority.tv_nsec/1000);

  cprintf("p3=%ld.%ld\n",proc_table[p3].timespec_priority.tv_sec,proc_table[p3].timespec_priority.tv_nsec/1000);

  cprintf("p4=%ld.%ld\n",proc_table[p4].timespec_priority.tv_sec,proc_table[p4].timespec_priority.tv_nsec/1000);

  task_endcycle();

  for (j=0; j<200000; j++) {

    q_timespec_insert(p4,&i);

    q_extract(p4,&i);

  }

  task_endcycle();

  for (j=0; j<200000; j++) {

    iq_timespec_insert(p4,&ii);

    iq_extract(p4,&ii);

  }

  task_endcycle();

  jet_gettable(exec_shadow, &last[0], 3);

  cprintf("\ninit=%d queue=%d iqueue=%d\n",

          (int)last[0], (int)last[1], (int)last[2]);

  sys_end();

  return NULL;

}

void *fake(void *arg)

{

  cputs("#");

  task_endcycle();

  return NULL;

}

void create1()

{

  HARD_TASK_MODEL m1;

  PID p1a;

  hard_task_default_model(m1);

  hard_task_def_wcet(m1, 500000);

  hard_task_def_group(m1,1);

  hard_task_def_periodic(m1);

  hard_task_def_mit(m1,1000000);

  hard_task_def_ctrl_jet(m1);

  p1a = task_create("a", star, &m1, NULL);

  if (p1a == -1) {

    perror("Could not create task a ...");

    sys_end();

  }

  hard_task_default_model(m1);

  hard_task_def_wcet(m1, 5000);

  hard_task_def_aperiodic(m1);

  hard_task_def_group(m1,1);

  hard_task_def_mit(m1,100000);

  p2 = task_create("a", fake, &m1, NULL);

  if (p1a == -1) {

    perror("Could not create task a ...");

    sys_end();

  }

  hard_task_def_mit(m1,100001);

  p3 = task_create("a", fake, &m1, NULL);

  if (p1a == -1) {

    perror("Could not create task a ...");

    sys_end();

  }

  hard_task_def_mit(m1,100002);

  p4 = task_create("a", fake, &m1, NULL);

  if (p1a == -1) {

    perror("Could not create task a ...");

    sys_end();

  }

  group_activate(1);

}

void endfun(KEY_EVT *k)

{

  cprintf("ESC pressed!");

  sys_end();

}

int main(int argc, char **argv)

{

  KEY_EVT k;

  sem_init(&s,0,1);

  k.flag = 0;

  k.scan = KEY_ESC;

  k.ascii = 27;

  keyb_hook(k,endfun);

  create1();

  return 0;

}