Говнокод #27515 — Си — Говнокод.ру

Говнокод: по колено в коде.

Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!

Си / Говнокод #27515

// https://github.com/shanecoughlan/OpenGEM/blob/ac06b1a3fec3f3e8defcaaf7ea0338c38c3cef46/source/OpenGEM-7-RC3-SDK/OpenGEM-7-SDK/GEM%20AES%20AND%20SOURCE%20CODE/FreeGEM%20AES%203.0%20(source%20code)/GEMEVLIB.C#L143
/*
*	Do a multi-wait on the specified events.
*/
	WORD
ev_multi(flags, pmo1, pmo2, tmcount, buparm, mebuff, prets)
	REG WORD	flags;
	REG MOBLK	*pmo1;
	MOBLK		*pmo2;
	LONG		tmcount;
	LONG		buparm;
	LPVOID		mebuff;
	WORD		prets[];
{
	QPB		m;
	REG EVSPEC	which;
	REG WORD	what;
	REG CQUEUE	*pc;
#if MULTIAPP
	WORD		evbuff[8];
	WORD		pid;
	SHELL		*psh;
	LONG		ljunk;

	pid = rlr->p_pid;
	psh = &sh[pid];
	if ( psh->sh_state & SHRINK )		/* shrink accessory	*/
	{
	  if (pr_shrink(pid, TRUE, &ljunk, &ljunk))
	    ap_exit(TRUE); /* if no swap space terminate acc */ 
	  psh->sh_state &= ~SHRINK;
	}
#endif

						/* say nothing has 	*/
						/*   happened yet	*/
	what = 0x0;
		 				/* do a pre-check for a	*/
						/*   keystroke & then	*/
						/*   clear out the forkq*/
	chkkbd();
	forker();
						/*   a keystroke	*/
	if (flags & MU_KEYBD)
	{
						/* if a character is 	*/
						/*   ready then get it	*/
	  pc = &rlr->p_cda->c_q;
	  if ( pc->c_cnt )
	  {
	    prets[4] = (UWORD) dq(pc);
	    what |= MU_KEYBD;
	  }
	}
						/* if we own the mouse	*/
						/*   then do quick chks	*/
	if ( rlr == gl_mowner )
	{
						/* quick check button	*/
	  if (flags & MU_BUTTON)
	  {
	    if ( (mtrans > 1) &&
		 (downorup(pr_button, buparm)) )
	    {
	      what |= MU_BUTTON;
	      prets[5] = pr_mclick;
	    }
	    else
	    {
	      if ( downorup(button, buparm) )
	      {
	        what |= MU_BUTTON;
	        prets[5] = mclick;
	      }
	    }
	  }
						/* quick check mouse rec*/
	  if ( ( flags & MU_M1 ) &&	
	       ( in_mrect(pmo1) ) )
	      what |= MU_M1;
						/* quick check mouse rec*/
	  if ( ( flags & MU_M2 ) &&
	       ( in_mrect(pmo2) ) )
	      what |= MU_M2;
	}
						/* quick check timer	*/
	if (flags & MU_TIMER)
	{
	  if ( tmcount == 0x0L )
	    what |= MU_TIMER;
	}
						/* quick check message	*/
	if (flags & MU_MESAG)
	{
	  if ( rlr->p_qindex > 0 )
	  {
#if MULTIAPP
	    ap_rdwr(MU_MESAG, rlr, 16, ADDR(&evbuff[0]) );
#endif
#if SINGLAPP

Уххх бля

Запостил:

j123123, 13 Июля 2021

Комментарии (10) RSS

j123123 13.07.2021 19:42 # 0

#if SINGLAPP
	    ap_rdwr(MU_MESAG, rlr, 16, mebuff);
#endif
	    what |= MU_MESAG;
	  }
	}
						/* check for quick out	*/
						/*   if something has	*/
						/*   already happened	*/
	if (what == 0x0)
	{
						/* wait for a keystroke	*/
	  if (flags & MU_KEYBD)
	    iasync( MU_KEYBD, 0x0L );
						/* wait for a button	*/
	  if (flags & MU_BUTTON)
	    iasync( MU_BUTTON, buparm );
						/* wait for mouse rect.	*/
	  if (flags & MU_M1)
	    iasync( MU_M1, (LONG)ADDR(pmo1) );
						/* wait for mouse rect.	*/
	  if (flags & MU_M2)
	    iasync( MU_M2, (LONG)ADDR(pmo2) ); 
						/* wait for message	*/
	  if (flags & MU_MESAG)
	  {
	    m.qpb_ppd = rlr;
	    m.qpb_cnt = 16;
#if MULTIAPP
	    m.qpb_buf = ADDR(&evbuff[0]);
#endif
#if SINGLAPP
	    m.qpb_buf = mebuff;
#endif
	    iasync( MU_MESAG, (LONG)ADDR(&m) );
	  }
						/* wait for timer	*/
	  if (flags & MU_TIMER)
	    iasync( MU_TIMER, tmcount / gl_ticktime );
						/* wait for events	*/
	  which = mwait( flags );
						/* cancel outstanding	*/
						/*   events		*/
	  which |= acancel( flags );
	}
						/* get the returns	*/
	ev_rets(&prets[0]);
						/* do aprets() if 	*/
						/*   something hasn't	*/
						/*   already happened	*/
	if (what == 0x0)
	{
	  what = which;
	  if (which & MU_KEYBD)
	    prets[4] = apret(MU_KEYBD);
	  if (which & MU_BUTTON)
	    prets[5] = apret(MU_BUTTON);
	  if (which & MU_M1)
	    apret(MU_M1);
	  if (which & MU_M2)
	    apret(MU_M2);
	  if (which & MU_MESAG)
	    apret(MU_MESAG);
	  if (which & MU_TIMER)
	    apret(MU_TIMER);
	}
#if MULTIAPP
	if ( (flags & MU_MESAG) && (what & MU_MESAG) )
	{
	  LBCOPY(mebuff, ADDR(&evbuff[0]), 16);
	}
#endif
	 	  	  	  	  	  /* return what happened*/
	return( what );
}

Ответить

j123123 13.07.2021 19:42 # 0

люблю такую забористую хрень на сишке. Тут еще к тому же старый стиль объявления типов аргументов к функции
Ответить
- bormand 13.07.2021 19:50 # 0
  
  Я однажды usb'шный драйвер для stm'ки в таком стиле писала, всё в одной функции. Тоже реакция на кучу битовых флажков.
  Ответить
- CHayT 13.07.2021 20:23 # +2
  
  Няслаждайся: https://github.com/erlang/otp/blob/master/erts/emulator/beam/erl_process.c
  Там один файл забористее другого.
  Ответить
  - Desktop 13.07.2021 20:28 # +2
    
    > schdlr_sspnd_inc_nscheds
    
    - фто
    Ответить
    - CHayT 13.07.2021 20:31 # +3
      
      Ну что ты как джава мэн. Очевидно же scheduler suspend increment n schedules.
      Ответить
    - j123123 13.07.2021 20:33 # +3
      
      т прнс?
      Ответить
- Kozel 14.07.2021 18:10 # +1
  
  и ограничение на количество символов в идентификаторе?
  Ответить
  - bormand 14.07.2021 20:12 # 0
    
    Это не столько ограничение, сколько стремление к лаконичности.
    Ответить
gologub 13.07.2021 20:26 # 0

какой CREAT
Ответить

Говнокод: по колено в коде.

Си / Говнокод #27515

Комментарии (10) RSS

Добавить комментарий