hook_provider.c-Dateireferenz

#include <hook.h>

Include-Abhängigkeitsdiagramm für hook_provider.c:

gehe zum Quellcode dieser Datei

Makrodefinitionen
#define	NEED_PROTOTYPES
Funktionen
protected status	h_dbg ()
void	HookTestOffer (int id, status stat)
void	HookTestTrigger (int id, mixed data)
nomask mapping	HCopyHookMapping ()
nomask protected void	CleanHookMapping (int *hookids)
nomask protected void	offerHook (int hookid, status offerstate)
status	HConsumerTypeIsAllowed (int type, object consumer)
status	HPriorityIsAllowed (int prio, object consumer)
nomask protected int	findObjectInTypeArr (mixed ar, object ob)
nomask status	HIsHookConsumer (int hookid, object consumer)
nomask protected int *	hookConsumerInfo (int hookid, object consumer)
nomask mapping	HListHookConsumer (int hookid)
nomask int *	HListHooks ()
status	HUnregisterFromHook (int hookid, object consumer)
nomask protected status	askSurveyorsForRegistrationAllowance (mixed *surveyors, object consumer, int hookid, int hookprio, int consumertype)
status	HRegisterToHook (int hookid, object consumer, int hookprio, int consumertype, int timeInSeconds)
nomask int	internalEntrySort (mixed a, mixed b)
nomask protected status	askSurveyorsForCancelAllowance (mixed surveyors, object modifiyingOb, mixed data, int hookid, int prio, object hookOb)
nomask protected status	askSurveyorsForModificationAllowance (mixed surveyors, object modifiyingOb, mixed data, int hookid, int prio, object hookOb)
nomask protected mixed	HookFlow (int hookid, mixed hookdata)
Variablen
private nosave mapping	hookMapping = ([])

---

Makro-Dokumentation

#define NEED_PROTOTYPES

Definiert in Zeile 13 der Datei hook_provider.c.

---

Dokumentation der Funktionen

nomask protected status askSurveyorsForCancelAllowance	(	mixed	surveyors,
		object	modifiyingOb,
		mixed	data,
		int	hookid,
		int	prio,
		object	hookOb
	)

Definiert in Zeile 311 der Datei hook_provider.c.

                                                                   {

  foreach(mixed surveyor: surveyors) {
    if (objectp(surveyor[H_OBJECT])
        && (surveyor[H_TIME] == -1 || surveyor[H_TIME] >= time())
        && surveyor[H_OBJECT]->HookCancelAllowanceCallback(modifiyingOb,
            hookid,hookOb,prio,data)==0) {
      return 0;
    }
  }
  return 1;
}

nomask protected status askSurveyorsForModificationAllowance	(	mixed	surveyors,
		object	modifiyingOb,
		mixed	data,
		int	hookid,
		int	prio,
		object	hookOb
	)

Definiert in Zeile 325 der Datei hook_provider.c.

                                                                   {

  foreach(mixed surveyor: surveyors) {
    if (objectp(surveyor[H_OBJECT])
      && (surveyor[H_TIME] == -1 || surveyor[H_TIME] >= time())
      && surveyor[H_OBJECT]->HookModificationAllowanceCallback(modifiyingOb,
            hookid,hookOb,prio,data)==0){
      return 0;
    }
  }
  return 1;
}

nomask protected status askSurveyorsForRegistrationAllowance	(	mixed *	surveyors,
		object	consumer,
		int	hookid,
		int	hookprio,
		int	consumertype
	)

Definiert in Zeile 203 der Datei hook_provider.c.

Benutzt H_DMSG, H_OBJECT, H_TIME und i.

Wird benutzt von HRegisterToHook().

                                                            {
  int i;
  status tmp;

  H_DMSG(sprintf("askSurveyorsForRegistrationAllowance surveyors %O, "
        "consumer %O, hookid %d, hookprio %d, consumertype %d\n",
        surveyors,consumer,hookid,hookprio,consumertype));

  foreach(mixed surveyor: surveyors) {
      if (objectp(surveyor[H_OBJECT])
          && (surveyor[H_TIME] == -1 || surveyor[H_TIME] >= time()) ) {
          H_DMSG(sprintf("Calling surveyor %O\n",surveyor[H_OBJECT]));
          tmp=surveyor[H_OBJECT]->HookRegistrationCallback(consumer, 
              hookid, this_object(), hookprio, consumertype);
          H_DMSG(sprintf("Result is %d\n",tmp));
          if(tmp==0){
              return 0;
          }
      }
  }
  return 1;
}

Hier ist ein Graph der zeigt, wo diese Funktion aufgerufen wird:

nomask protected void CleanHookMapping

(

int *

hookids

)

Definiert in Zeile 55 der Datei hook_provider.c.

Benutzt H_OBJECT, H_TIME und hookMapping.

Wird benutzt von HListHookConsumer(), HookFlow() und HRegisterToHook().

                                                    {
  // hooks enthaelt die aufzuraeumenden Hooks. Wenn kein Array -> alle Hooks
  if (pointerp(hookids))
    hookids=m_indices(hookMapping);

  foreach(int hookid : hookids) { // alle Hooks
    foreach(int consumertype, mixed consumers : hookMapping[hookid]) {  // Consumertypen
      foreach(int *hookentry : &consumers) { // Hookeintraege / Consumer
        if (!hookentry[H_OBJECT]
            || (hookentry[H_TIME] > -1 && hookentry[H_TIME] < time()))
            hookentry = 0;
      }
      // 0 noch rauswerfen.
      hookMapping[hookid][consumertype] -= ({0});
    }
  }

}

Hier ist ein Graph der zeigt, wo diese Funktion aufgerufen wird:

nomask protected int findObjectInTypeArr	(	mixed	ar,
		object	ob
	)

Definiert in Zeile 106 der Datei hook_provider.c.

Benutzt H_OBJECT, H_TIME und i.

Wird benutzt von hookConsumerInfo().

{
  int i=sizeof(ar)-1;

  for ( ; i>=0 ; i--) {
      if(ar[i][H_OBJECT]==ob &&
          (ar[i][H_TIME]<0 || ar[i][H_TIME] >= time() )) {
          return i;
      }
  }

  return -1;
}

Hier ist ein Graph der zeigt, wo diese Funktion aufgerufen wird:

protected status h_dbg

(

)

Definiert in Zeile 37 der Datei hook_provider.c.

Wird benutzt von HookTestOffer() und HookTestTrigger().

{return 0;}

Hier ist ein Graph der zeigt, wo diese Funktion aufgerufen wird:

status HConsumerTypeIsAllowed	(	int	type,
		object	consumer
	)

Definiert in Zeile 98 der Datei hook_provider.c.

Wird benutzt von HRegisterToHook().

                                                        {
  return 1;
}

Hier ist ein Graph der zeigt, wo diese Funktion aufgerufen wird:

nomask mapping HCopyHookMapping

(

)

Definiert in Zeile 51 der Datei hook_provider.c.

Benutzt hookMapping.

                                 {
  return deep_copy(hookMapping);
}

nomask status HIsHookConsumer	(	int	hookid,
		object	consumer
	)

Definiert in Zeile 121 der Datei hook_provider.c.

Benutzt hookConsumerInfo().

Wird benutzt von HRegisterToHook().

                                                           {
  if(hookConsumerInfo(hookid,consumer)!=0){
      return 1;
  }

  return 0;
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

Hier ist ein Graph der zeigt, wo diese Funktion aufgerufen wird:

nomask mapping HListHookConsumer

(

int

hookid

)

Definiert in Zeile 171 der Datei hook_provider.c.

Benutzt CleanHookMapping() und hookMapping.

                                            {

  if(member(hookMapping,hookid)) {
      CleanHookMapping(({hookid}));
      return deep_copy(hookMapping[hookid]);
  }

  return 0;
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

nomask int* HListHooks

(

)

Definiert in Zeile 181 der Datei hook_provider.c.

Benutzt hookMapping.

                        {
  if(sizeof(hookMapping)) {
      return m_indices(hookMapping);
  }
  return ({});
}

nomask protected int* hookConsumerInfo	(	int	hookid,
		object	consumer
	)

Definiert in Zeile 129 der Datei hook_provider.c.

Benutzt findObjectInTypeArr(), H_DATA_MODIFICATOR, H_DMSG, H_HOOK_MODIFICATOR, H_HOOK_SURVEYOR, H_LISTENER und hookMapping.

Wird benutzt von HIsHookConsumer() und HUnregisterFromHook().

{
  int* ret;
  int index;
  ret=0;

  H_DMSG(sprintf("hookConsumerInfo hookid %d consumer %O\n",hookid,consumer));

  // Consumertypen in der Reihenfolge pruefen, in der die Max-Anzahlen
  // abnehmen.
  if(consumer && member(hookMapping,hookid)){
      index=findObjectInTypeArr(hookMapping[hookid][H_LISTENER],
          consumer);
      if (index!=-1) {
          ret=({H_LISTENER,index});
      }
      else{
          index=findObjectInTypeArr(hookMapping[hookid][H_DATA_MODIFICATOR],
              consumer);
          if(index!=-1){
              ret=({H_DATA_MODIFICATOR,index});
          }
          else{
              index=findObjectInTypeArr(hookMapping[hookid][H_HOOK_MODIFICATOR],
                  consumer);
              if(index!=-1){
                  ret=({H_HOOK_MODIFICATOR,index});
              }
              else{
                  index=findObjectInTypeArr(hookMapping[hookid][H_HOOK_SURVEYOR],
                      consumer);
                  if(index!=-1){
                      ret=({H_HOOK_SURVEYOR,index});
                  }
              }
          }
      }
  }
  H_DMSG(sprintf("  result %O\n",ret));
  return ret;
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

Hier ist ein Graph der zeigt, wo diese Funktion aufgerufen wird:

nomask protected mixed HookFlow	(	int	hookid,
		mixed	hookdata
	)

Definiert in Zeile 339 der Datei hook_provider.c.

Benutzt call_out() und CleanHookMapping().

Wird benutzt von _set_alcohol(), _set_drink(), _set_food(), _set_poison(), Attack(), consume(), HookTestTrigger() und move().

                                                           {
  mixed tmp;
  mixed ret;

  ret=({H_NO_MOD,hookdata});

  H_DMSG(sprintf("HookFlow hookid %d hookdata %O\n",hookid,hookdata));
  if(member(hookMapping,hookid)) {

    // notify surveyors
    foreach(mixed surv: hookMapping[hookid][H_HOOK_SURVEYOR]) {
      if (objectp(surv[H_OBJECT])
          && (surv[H_TIME] == -1 || surv[H_TIME] >= time()) )
      {
        tmp=surv[H_OBJECT]->HookCallback(this_object(), hookid,ret[H_RETDATA]);
        if(tmp[H_RETCODE]==H_CANCELLED) {
          ret[H_RETCODE]=H_CANCELLED;
          return ret;  // und weg...
        }
        else if(tmp[H_RETCODE]==H_ALTERED){
          ret[H_RETCODE]=H_ALTERED;
          ret[H_RETDATA]=tmp[H_RETDATA];
        }
      }
      // ungueltige/abgelaufene Eintraege -> Aufraeumen, aber nicht jetzt.
      else if (find_call_out(#'CleanHookMapping) == -1) {
        call_out(#'CleanHookMapping,0,({hookid}));
      }
    }

    // notify hmods
    foreach(mixed hmod: hookMapping[hookid][H_HOOK_MODIFICATOR]) {
      if (objectp(hmod[H_OBJECT])
          && (hmod[H_TIME] == -1 || hmod[H_TIME] >= time()) )
      {
        tmp=hmod[H_OBJECT]->HookCallback(this_object(),hookid, ret[H_RETDATA]);
        if(tmp[H_RETCODE]==H_CANCELLED) {
          // ask allowance in surveyors
          if(askSurveyorsForCancelAllowance(hookMapping[hookid][H_HOOK_SURVEYOR],
                hmod[H_OBJECT],hookdata,hookid,
                hmod[H_PRIO],this_object()))
          {
              ret[H_RETCODE]=H_CANCELLED;
              return ret; // und raus...
          }
        }
        else if(tmp[H_RETCODE]==H_ALTERED) {
          // ask allowance in surveyors
          if(askSurveyorsForModificationAllowance(hookMapping[hookid][H_HOOK_SURVEYOR],
                hmod[H_OBJECT],hookdata,hookid,
                hmod[H_PRIO],this_object()))
          {
              ret[H_RETCODE]=H_ALTERED;
              ret[H_RETDATA]=tmp[H_RETDATA];
          }
        }
      }
      // ungueltige/abgelaufene Eintraege -> Aufraeumen, aber nicht jetzt.
      else if (find_call_out(#'CleanHookMapping) == -1) {
        call_out(#'CleanHookMapping,0,({hookid}));
      }
    }

    // notify dmods
    foreach(mixed dmod: hookMapping[hookid][H_DATA_MODIFICATOR]) {
      if (objectp(dmod[H_OBJECT])
          && (dmod[H_TIME] == -1 || dmod[H_TIME] >= time()) ) {
        tmp=dmod[H_OBJECT]->HookCallback(this_object(),hookid,ret[H_RETDATA]);
        if(tmp[H_RETCODE]==H_ALTERED) {
          // ask allowance in surveyors
          if(askSurveyorsForModificationAllowance(hookMapping[hookid][H_HOOK_SURVEYOR],
                dmod[H_OBJECT],hookdata,hookid,
                dmod[H_PRIO],this_object())) 
          {
            ret[H_RETCODE]=H_ALTERED;
            ret[H_RETDATA]=tmp[H_RETDATA];
          }
        }
      }
      // ungueltige/abgelaufene Eintraege -> Aufraeumen, aber nicht jetzt.
      else if (find_call_out(#'CleanHookMapping) == -1) {
        call_out(#'CleanHookMapping,0,({hookid}));
      }
    }

    // notify listener
    foreach(mixed listener: hookMapping[hookid][H_LISTENER]) {
      if (objectp(listener[H_OBJECT])
          && (listener[H_TIME] == -1 || listener[H_TIME] >= time()) ) {
        listener[H_OBJECT]->HookCallback(this_object(),hookid,ret[H_RETDATA]);
      }
      // ungueltige/abgelaufene Eintraege -> Aufraeumen, aber nicht jetzt.
      else if (find_call_out(#'CleanHookMapping) == -1) {
        call_out(#'CleanHookMapping,0,({hookid}));
      }
    }

  }

  return ret;
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

Hier ist ein Graph der zeigt, wo diese Funktion aufgerufen wird:

void HookTestOffer	(	int	id,
		status	stat
	)

Definiert in Zeile 39 der Datei hook_provider.c.

Benutzt h_dbg() und offerHook().

                                      {
  if(h_dbg()) {
      offerHook(id,stat);
  }
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

void HookTestTrigger	(	int	id,
		mixed	data
	)

Definiert in Zeile 45 der Datei hook_provider.c.

Benutzt h_dbg() und HookFlow().

                                       {
  if(h_dbg()) {
      HookFlow(id,data);
  }
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

status HPriorityIsAllowed	(	int	prio,
		object	consumer
	)

Definiert in Zeile 102 der Datei hook_provider.c.

Wird benutzt von HRegisterToHook().

                                                    {
  return 1;
}

Hier ist ein Graph der zeigt, wo diese Funktion aufgerufen wird:

status HRegisterToHook	(	int	hookid,
		object	consumer,
		int	hookprio,
		int	consumertype,
		int	timeInSeconds
	)

Definiert in Zeile 227 der Datei hook_provider.c.

Benutzt askSurveyorsForRegistrationAllowance(), CleanHookMapping(), H_CONSUMERCHECK, H_DMSG, H_HOOK_SURVEYOR, H_HOOK_VALIDPRIO, H_OBJECT, H_PRIO, HConsumerTypeIsAllowed(), HIsHookConsumer(), hookMapping, HPriorityIsAllowed() und MAX_HOOK_COUNTS.

Wird benutzt von init().

                                                            {
  status ret;
  mixed ar;
  int regtime;

  if(timeInSeconds>0) {
      regtime=time() + timeInSeconds;
  }
  else{
      regtime=-1;
  }
  ret=0;

  H_DMSG(sprintf("HRegisterToHook hookid %d consumer %O\n hookprio %d "
        "consumertype %d\n",hookid,consumer,hookprio,consumertype));

  CleanHookMapping(({hookid})); // entfernt abgelaufene Eintraege

  if(member(hookMapping,hookid) && consumer!=0 && 
      !HIsHookConsumer(hookid,consumer)) {
      H_DMSG("First barrier\n");
      if(H_CONSUMERCHECK(consumertype)!=-1 && 
          HConsumerTypeIsAllowed(consumertype,consumer)){
          H_DMSG("Second barrier\n");
          if(H_HOOK_VALIDPRIO(hookprio)!=-1 && 
              HPriorityIsAllowed(hookprio,consumer)){
              H_DMSG("Third barrier\n");
              if(askSurveyorsForRegistrationAllowance(hookMapping[hookid][H_HOOK_SURVEYOR],
                    consumer,hookid,hookprio,consumertype)) {
                  H_DMSG("Fourth barrier\n");

                  // ar enthaelt die Hookeintraege
                  ar=hookMapping[hookid][consumertype];
                  if (sizeof(ar) < MAX_HOOK_COUNTS[consumertype]) {
                    // max. Anzahl an Eintraegen fuer diesen Typ noch nicht
                    // erreicht, direkt anhaengen.
                    ar += ({ ({consumer,hookprio,regtime}) });
                    hookMapping[hookid][consumertype]=ar;
                    ret=1;
                  }
                  else {
                    // gibt es einen Eintrag mit hoeherem Priowert (niedrigere
                    // Prioritaet), den man ersetzen koennte?
                    // Das Array ist sortiert, mit hoechsten Priowerten am
                    // Ende. Ersetzt werden soll der Eintrag mit dem hoechsten
                    // Zahlenwert, falls der neue Eintrag einen niedrigeren Wert
                    // hat.
                    // Pruefung auf Objektexistenz, falls der Surveyor Objekte
                    // zerstoert...
                    if (!objectp(ar[<1][H_OBJECT]) ||
                        (ar[<1][H_PRIO] > hookprio
                         && ar[<1][H_OBJECT]->superseededHook(hookid,this_object()))
                        ) {
                      H_DMSG("Found superseedable entry\n");
                      ar[<1] = ({consumer,hookprio,regtime});
                      // nicht noetig, wegen Array -> Referenz
                      //hookMapping[hookid][consumertype]=ar;
                      ret = 1;
                    }
                  }
              }

          }
      }
  }
  // wenn ein Eintrag hinzugefuegt wurde, muss neu sortiert werden
  if (ret) {
  hookMapping[hookid][consumertype] =
    sort_array(hookMapping[hookid][consumertype],#'internalEntrySort);
  }

  H_DMSG(sprintf("  result %O\n",hookMapping));

  return ret;
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

Hier ist ein Graph der zeigt, wo diese Funktion aufgerufen wird:

status HUnregisterFromHook	(	int	hookid,
		object	consumer
	)

Definiert in Zeile 188 der Datei hook_provider.c.

Benutzt H_DMSG, H_INDEX, H_TYPE, hookConsumerInfo(), hookMapping und info.

                                                       {
  int* info;
  status ret=0;

  H_DMSG(sprintf("HUnregisterFromHook hookid %d consumer %O\n",hookid,consumer));
  info=hookConsumerInfo(hookid,consumer);
  if (info) {
      hookMapping[hookid][info[H_TYPE]][info[H_INDEX]]=0;
      hookMapping[hookid][info[H_TYPE]] -= ({0});
      ret=1;
  }
  H_DMSG(sprintf("  result %O\n",hookMapping));
  return ret;
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

nomask int internalEntrySort	(	mixed	a,
		mixed	b
	)

Definiert in Zeile 304 der Datei hook_provider.c.

                                              {
  if(a[H_PRIO]<=b[H_PRIO]){
      return 0;
  }
  return 1;
}

nomask protected void offerHook	(	int	hookid,
		status	offerstate
	)

Definiert in Zeile 74 der Datei hook_provider.c.

Benutzt H_DATA_MODIFICATOR, H_DMSG, H_HOOK_MODIFICATOR, H_HOOK_SURVEYOR, H_LISTENER und hookMapping.

Wird benutzt von create() und HookTestOffer().

{
  H_DMSG(sprintf("offerHook hookid %d offerstate %d\n",hookid,offerstate));
  if(hookid>0)
  {
      if(offerstate){
          if(!member(hookMapping,hookid)){
              hookMapping+=([hookid:([
                  H_HOOK_SURVEYOR:    ({}),
                  H_HOOK_MODIFICATOR: ({}),
                  H_DATA_MODIFICATOR: ({}),
                  H_LISTENER:         ({}),
              ])]);
          }
      }
      else{
          if(member(hookMapping,hookid)){
              hookMapping-=([hookid]);
          }
      }
  }
  H_DMSG(sprintf("  result %O\n",hookMapping));
}

Hier ist ein Graph der zeigt, wo diese Funktion aufgerufen wird:

---

Variablen-Dokumentation

private nosave mapping hookMapping = ([])

Definiert in Zeile 29 der Datei hook_provider.c.

Wird benutzt von CleanHookMapping(), HCopyHookMapping(), HListHookConsumer(), HListHooks(), hookConsumerInfo(), HRegisterToHook(), HUnregisterFromHook() und offerHook().