Example #1
0
/** main thread -- parent **/
int main() {
   tcb_t *tid1, *tid2;
   startThreadSystem();
   /* Create user threads */
   tid1= newThread(sub1);
   tid2= newThread(sub2);

   printf("Waiting on tid1\n"); fflush(stdout);
   twait(tid1);
   printf("Waiting on tid2\n"); fflush(stdout);
   twait(tid2);

   printf("Main done\n");
   exit(0);
}
Example #2
0
File: ts.c Project: liuhuac/OS
/** Main thread **/
int main() {
   tcb_t *tid1, *tid2, *tid3, *tid4;

   /* Start the child threads running, and wait for them to complete */
   startThreadSystem();

   tid1 = newThread(sub1);
   tid2 = newThread(sub2);
   tid3 = newThread(sub3);
   tid4 = newThread(sub4);

   twait(tid1);
   twait(tid2);
   twait(tid3);
   twait(tid4);
   
   /* All threads have finished */
   printf("Main done\n");
   exit(0);
}
Example #3
0
File: hw4test.c Project: liuhuac/OS
/** main **/
int main() {
   int ndx;
   mystack_t *stack1;
   mystack_t *stack2;

   startThreadSystem();

   /* Create stack1 */
   stack1 = newStack(100);
   /* And exercise it by spawning 4 threads */
   for (ndx=0; ndx<4; ndx++) {
       parm[ndx].myID = ndx;
       parm[ndx].numWords = 30000;
       parm[ndx].stack = stack1;
       if ((ndx%2) == 0) {
          id[ndx] = newThread(pusher);
       }
       else {
          id[ndx] = newThread(popper);
       }
   }

   /* Create stack2 */
   stack2 = newStack(5000);
   /* And exercise it by spawning 6 threads */
   for (; ndx<10; ndx++) {
       parm[ndx].myID = ndx;
       parm[ndx].numWords = 9000;
       parm[ndx].stack = stack2;
       if ((ndx%2) == 0) {
          id[ndx] = newThread(pusher);
       }
       else {
          id[ndx] = newThread(popper);
       }
   }

   /* Wait for everyone to end */
   for (ndx=0; ndx<10; ndx++) {
       twait(id[ndx]);
       if ((ndx % 2) == 1) {
          printf("Popper %d count = %d\n", ndx, parm[ndx].popcount);
       }
   }

   printf("Main thread done\n");
   exit(0);
}
Example #4
0
int main() {
  
  struct rwlock m;
  int i;
  int children[N_THREADS];
  char *stacks[N_THREADS];
  int start = uptime();

  for (i = 0; i < N_THREADS; i++)
    stacks[i] = malloc(STACK_SIZE);

  rwlock(&m, OP_INIT);

  for (i = 0; i < N_THREADS; i++) {
    children[i] = tfork(child_main, &m, stacks[i] + STACK_SIZE);
    if (children[i] < 0)
      handle_error("error on tfork()");
  }

  for (i = 0; i < N_THREADS; i++) {
    if (twait(children[i]) < 0)
      handle_error("error on twait()");
  }

  rwlock(&m, OP_DESTROY);

  printf(stderr, "Program finished in %d tick(s).\n", uptime() - start);
  if (!time_equal(uptime() - start, ONE_SEC * N_THREADS))
    handle_error("Did not finish in a correct time.");

  for (i = 0; i < N_THREADS; i++)
    free(stacks[i]);

  printf(stdout, "hw3-test-writelock succeeded\n");
  
  exit();
}
Example #5
0
tmain()
{
	int		k, code = 0;
	Vmalloc_t	*shm, *map;
	char		*arg[5];
	pid_t		ppid, cpid;

	if(k = tchild())
	{	cpid = getpid();
		shmfile = argv[k];
		mapfile = argv[k+1];

		tinfo("Child[pid=%d]: allocating heap memory before opening shm region", cpid);
		for(k = 0; k < 1024; ++k)
			if(!malloc(32*1024) )
				terror("Child[pid=%d]: Can't allocate segment %d", cpid, k);

		if(*shmfile)
		{	tinfo("Child[pid=%d]: opening shm region", cpid);
			if(!(shm = vmmopen(shmfile, 1, MAPSIZE)) )
				terror("Child[pid=%d]: Can't open shm region in child process", cpid);
			tinfo("Child[pid=%d]: shm region opened", cpid);
		}

		tinfo("Child[pid=%d]: allocating heap memory before opening map region", cpid);
		for(k = 0; k < 1024; ++k)
			if(!malloc(32*1024) )
				terror("Child[pid=%d]: Can't allocate segment %d", cpid, k);

		if(*mapfile)
		{	tinfo("Child[pid=%d]: opening map region", cpid);
			if(!(map = vmmopen(mapfile, -1, MAPSIZE)) )
				terror("Child[pid=%d]: Can't open map region in child process", cpid);
			tinfo("Child[pid=%d]: map region opened", cpid);
		}
	}
	else
	{	ppid = getpid();
		shmfile = tstfile("shm", -1);
		mapfile = tstfile("map", -1);
		(void)unlink(shmfile);
		(void)unlink(mapfile);
		
		tinfo("Parent[pid=%d]: %s: opening shm region", ppid, shmfile);
		if(shm = vmmopen(shmfile, 1, MAPSIZE) )
			tinfo("Parent[pid=%d]: %s: shm region opened", ppid, shmfile);
		else
		{	tnote("shm not supported");
			shmfile = "";
		}

		tinfo("Parent[pid=%d]: %s: opening map region", ppid, mapfile);
		if(map = vmmopen(mapfile, -1, MAPSIZE) )
			tinfo("Parent[pid=%d]: %s: map region opened", ppid, mapfile);
		else
		{	tnote("map not supported");
			mapfile = "";
		}

		switch((cpid = fork()) ) /* make a child process */
		{ default :
			code = twait(&cpid, 1);
			break;
		  case 0 :
			arg[0] = argv[0];
			arg[1] = "--child";
			arg[2] = shmfile;
			arg[3] = mapfile;
			arg[4] = 0;
			if(execv(argv[0], arg) < 0 )
				terror("Could not exec child process");
		  case -1:
			terror("Could not fork a child process");
		}
	}

	vmmrelease(shm, 1); vmclose(shm);
	vmmrelease(map, 1); vmclose(map);

	texit(code);
}
Example #6
0
void	m_keyb(int ch,int bank,int prg,int velo)
{
	int	bnk_m,bnk_l,pm,ch2;
	int	a,i;

	unsigned char	onkey[32],onnote[32];
	unsigned char	s[16],ke[128];
	char	obuf[64];

	msg("Music KeyBoard Emulater");

	if(rcd->act==0){all_note_off(0);}
	bnk_l=bank>>8;bnk_m=bank&0xff;ch=(ch-1)&31;ch2=ch&15;
	pm=rcd->put_mode;rcd->put_mode=rcd->ch_port[ch];
	twait(5);

	if(bank>=0 && tim_asin[ch+1]>=7 && tim_asin[ch+1]<=14){
		obuf[0]=0xb0+ch2;obuf[1]=0;obuf[2]=bnk_m;
		obuf[3]=32;obuf[4]=bnk_l;obuf[5]=255;
		(*rcd->mix_out)(obuf);
	}

	if(prg>=0){
		obuf[0]=0xc0+ch2;obuf[1]=prg;obuf[2]=255;
		(*rcd->mix_out)(obuf);
	}
	twait(8);

	strcpy(onkey,"                ");

	while (1){
		int	ln,sh;
		if(INPOUT(0xff)==27){break;}
		sh=B_SFTSNS();

		ln=0;
		for(i=0;i<=6;i++){
			a=BITSNS(i);
			if( a & 1   ){ke[ln++]=bitkey[i][0];}
			if( a & 2   ){ke[ln++]=bitkey[i][1];}
			if( a & 4   ){ke[ln++]=bitkey[i][2];}
			if( a & 8   ){ke[ln++]=bitkey[i][3];}
			if( a & 16  ){ke[ln++]=bitkey[i][4];}
			if( a & 32  ){ke[ln++]=bitkey[i][5];}
			if( a & 64  ){ke[ln++]=bitkey[i][6];}
			if( a & 128 ){ke[ln++]=bitkey[i][7];}
		}
		ke[ln]=0;

		for (i=0;i<16;i++){
			if ( onkey[i]>32 ) {
				int a;
				s[0]=onkey[i];s[1]=0;
				a=str_search(ke,s);
				if( a==0 ){
					int note;
					onkey[i]=32;note=onnote[i];

					/* note off */

					obuf[0]=0x90+ch2;obuf[1]=note;obuf[2]=0;
					obuf[3]=255;(*rcd->mix_out)(obuf);
				}
			}
		}
		ln=0;
		for (i=0;i<16;i++){
			if(ke[ln]==0){break;}
			if(onkey[i]==32){
				s[0]=ke[ln++];s[1]=0;
				if(str_search(onkey,s)==0){
					int a;
					a=str_search(keytable,s);
					if(a!=0){
						int note;
						onkey[i]=s[0];note=keycode[a];
						if(sh&1){note+=12;}/*shift*/
						if(sh&2){note-=12;}/*ctrl*/
						if(sh&128){note+=12;}/*caps*/
						if(sh&256){note-=12;}/*かな*/
						onnote[i]=note;

						/* note on */

						obuf[0]=0x90+ch2;obuf[1]=note;obuf[2]=velo;
						obuf[3]=255;(*rcd->mix_out)(obuf);

					}
				}
			}
		}
	}

/*
97-10-24	key.emu.で発音したままになるかもしれないのを修正した

	for (i=0;i<16;i++){
		if ( onkey[i]>32 ) {
			int note;

			note=onnote[i];

			*//* note off *//*

			obuf[0]=0x90+ch2;obuf[1]=note;obuf[2]=0;
			obuf[3]=255;(*rcd->mix_out)(obuf);
		}
	}
*/

	snsclr();rcd->put_mode=pm;msg_clr();
}