Loading...
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 | /* $Id: fsm.c,v 1.2 1996/04/29 22:49:57 fritz Exp $ * * $Log: fsm.c,v $ * Revision 1.2 1996/04/29 22:49:57 fritz * Removed compatibility-macros. * * Revision 1.1 1996/04/13 10:23:41 fritz * Initial revision * * */ #define __NO_VERSION__ #include "teles.h" void FsmNew(struct Fsm *fsm, struct FsmNode *fnlist, int fncount) { int i; fsm->jumpmatrix = (int *) Smalloc(4L * fsm->state_count * fsm->event_count, GFP_KERNEL, "Fsm jumpmatrix"); memset(fsm->jumpmatrix, 0, 4L * fsm->state_count * fsm->event_count); for (i = 0; i < fncount; i++) fsm->jumpmatrix[fsm->state_count * fnlist[i].event + fnlist[i].state] = (int) fnlist[i].routine; } void FsmFree(struct Fsm *fsm) { Sfree((void *) fsm->jumpmatrix); } int FsmEvent(struct FsmInst *fi, int event, void *arg) { void (*r) (struct FsmInst *, int, void *); char str[80]; r = (void (*)) fi->fsm->jumpmatrix[fi->fsm->state_count * event + fi->state]; if (r) { if (fi->debug) { sprintf(str, "State %s Event %s", fi->fsm->strState[fi->state], fi->fsm->strEvent[event]); fi->printdebug(fi, str); } r(fi, event, arg); return (0); } else { if (fi->debug) { sprintf(str, "State %s Event %s no routine", fi->fsm->strState[fi->state], fi->fsm->strEvent[event]); fi->printdebug(fi, str); } return (!0); } } void FsmChangeState(struct FsmInst *fi, int newstate) { char str[80]; fi->state = newstate; if (fi->debug) { sprintf(str, "ChangeState %s", fi->fsm->strState[newstate]); fi->printdebug(fi, str); } } static void FsmExpireTimer(struct FsmTimer *ft) { FsmEvent(ft->fi, ft->event, ft->arg); } void FsmInitTimer(struct FsmInst *fi, struct FsmTimer *ft) { ft->fi = fi; ft->tl.function = (void *) FsmExpireTimer; ft->tl.data = (long) ft; init_timer(&ft->tl); } void FsmDelTimer(struct FsmTimer *ft, int where) { long flags; #if 0 if (ft->fi->debug) { sprintf(str, "FsmDelTimer %lx %d", ft, where); ft->fi->printdebug(ft->fi, str); } #endif save_flags(flags); cli(); if (ft->tl.next) del_timer(&ft->tl); restore_flags(flags); } int FsmAddTimer(struct FsmTimer *ft, int millisec, int event, void *arg, int where) { #if 0 if (ft->fi->debug) { sprintf(str, "FsmAddTimer %lx %d %d", ft, millisec, where); ft->fi->printdebug(ft->fi, str); } #endif if (ft->tl.next) { printk(KERN_WARNING "FsmAddTimer: timer already active!\n"); return -1; } init_timer(&ft->tl); ft->event = event; ft->arg = arg; ft->tl.expires = jiffies + (millisec * HZ) / 1000; add_timer(&ft->tl); return 0; } int FsmTimerRunning(struct FsmTimer *ft) { return (ft->tl.next != NULL); } void jiftime(char *s, long mark) { s += 8; *s-- = '\0'; *s-- = mark % 10 + '0'; mark /= 10; *s-- = mark % 10 + '0'; mark /= 10; *s-- = '.'; *s-- = mark % 10 + '0'; mark /= 10; *s-- = mark % 6 + '0'; mark /= 6; *s-- = ':'; *s-- = mark % 10 + '0'; mark /= 10; *s-- = mark % 10 + '0'; } |