julian C / VarStore

Important changes to repositories hosted on mbed.com

Mbed hosted mercurial repositories are deprecated and are due to be permanently deleted in July 2026.

To keep a copy of this software download the repository Zip archive or clone locally using Mercurial.

It is also possible to export all your personal repositories from the account settings page.

VarStore.cpp@17:8c20a558d34f, 2014-08-26 (annotated)

Committer:
julmbed
Date:
Tue Aug 26 09:39:40 2014 +0000
Revision:
17:8c20a558d34f
Parent:
13:e1ba5bf9e51f 
fixed doc typos

Who changed what in which revision?

UserRevisionLine numberNew contents of line
julmbed 0:85afbf3c9fad 1
julmbed 0:85afbf3c9fad 2 #include <string.h>
julmbed 0:85afbf3c9fad 3 #include <stdio.h>
julmbed 0:85afbf3c9fad 4 #include "mbed.h"
julmbed 0:85afbf3c9fad 5 #include "rtos.h"
julmbed 8:934ec53fe2c0 6
julmbed 0:85afbf3c9fad 7
julmbed 2:a59207652720 8 extern "C" void mbed_reset();
julmbed 2:a59207652720 9
julmbed 0:85afbf3c9fad 10 #include "VarStore.h"
julmbed 0:85afbf3c9fad 11
julmbed 0:85afbf3c9fad 12 #define CI_SZ 100
julmbed 0:85afbf3c9fad 13
julmbed 13:e1ba5bf9e51f 14 /* Constructor
julmbed 13:e1ba5bf9e51f 15 */
julmbed 12:e9c8d2d9ac71 16 VarStore::VarStore( RawSerial *ser, int sz)
julmbed 0:85afbf3c9fad 17 {
julmbed 0:85afbf3c9fad 18 VarCounter=0;
julmbed 8:934ec53fe2c0 19 this->pc=ser;
julmbed 12:e9c8d2d9ac71 20 this->sz=sz;
julmbed 13:e1ba5bf9e51f 21 //Store=(VarItem *) malloc( sizeof(VarItem)*sz); doesn't work
julmbed 12:e9c8d2d9ac71 22 Store=new VarItem[sz];
julmbed 0:85afbf3c9fad 23 }
julmbed 0:85afbf3c9fad 24
julmbed 13:e1ba5bf9e51f 25 /* destructor
julmbed 13:e1ba5bf9e51f 26 */
julmbed 0:85afbf3c9fad 27 VarStore::~VarStore()
julmbed 0:85afbf3c9fad 28 {
julmbed 0:85afbf3c9fad 29 //dtor
julmbed 0:85afbf3c9fad 30 }
julmbed 0:85afbf3c9fad 31
julmbed 13:e1ba5bf9e51f 32 /* destructor
julmbed 13:e1ba5bf9e51f 33 */
julmbed 2:a59207652720 34 char *VarStore::Set(char *Input)
julmbed 0:85afbf3c9fad 35 {
julmbed 0:85afbf3c9fad 36 VarItem *V;
julmbed 0:85afbf3c9fad 37 char *Name;
julmbed 0:85afbf3c9fad 38
julmbed 8:934ec53fe2c0 39 // beaware of puts pc->printf("VarStore Set %s\n",Input);
julmbed 8:934ec53fe2c0 40
julmbed 0:85afbf3c9fad 41 if(Input [0] == 's') {
julmbed 0:85afbf3c9fad 42 strtok(Input,":");
julmbed 0:85afbf3c9fad 43 Name=strtok(NULL,":");
julmbed 0:85afbf3c9fad 44 if((V=GetVar(Name)) != NULL)
julmbed 2:a59207652720 45 return V->SetVal(strtok(NULL,":"))!= ERR ? Input : NULL;
julmbed 0:85afbf3c9fad 46 }
julmbed 2:a59207652720 47 return NULL;
julmbed 0:85afbf3c9fad 48 }
julmbed 0:85afbf3c9fad 49
julmbed 0:85afbf3c9fad 50
julmbed 13:e1ba5bf9e51f 51 /*
julmbed 13:e1ba5bf9e51f 52 ************************
julmbed 13:e1ba5bf9e51f 53 */
julmbed 0:85afbf3c9fad 54 int VarStore::Load(char *Name, void *VarPtr,VarTypes VarType )
julmbed 0:85afbf3c9fad 55 {
julmbed 0:85afbf3c9fad 56 return Load(Name, VarPtr,VarType,0 );
julmbed 0:85afbf3c9fad 57 }
julmbed 0:85afbf3c9fad 58
julmbed 13:e1ba5bf9e51f 59 /*
julmbed 13:e1ba5bf9e51f 60 ************************
julmbed 13:e1ba5bf9e51f 61 */
julmbed 0:85afbf3c9fad 62 int VarStore::Load(char *Name, void *VarPtr,VarTypes VarType, int Size )
julmbed 0:85afbf3c9fad 63 {
julmbed 13:e1ba5bf9e51f 64
julmbed 0:85afbf3c9fad 65 if(GetVar(Name) ==NULL) {
julmbed 13:e1ba5bf9e51f 66
julmbed 12:e9c8d2d9ac71 67 if(VarCounter < sz) {
julmbed 13:e1ba5bf9e51f 68
julmbed 0:85afbf3c9fad 69 Store[VarCounter].SetVar(VarType,VarPtr);
julmbed 0:85afbf3c9fad 70 Store[VarCounter].SetVarName(Name);
julmbed 0:85afbf3c9fad 71 Store[VarCounter].SetVarArraySize(Size);
julmbed 0:85afbf3c9fad 72 VarCounter++;
julmbed 13:e1ba5bf9e51f 73
julmbed 12:e9c8d2d9ac71 74 return NULL;
julmbed 0:85afbf3c9fad 75 }
julmbed 0:85afbf3c9fad 76 }
julmbed 13:e1ba5bf9e51f 77
julmbed 0:85afbf3c9fad 78 return ERR;
julmbed 0:85afbf3c9fad 79 }
julmbed 0:85afbf3c9fad 80
julmbed 13:e1ba5bf9e51f 81 /*
julmbed 13:e1ba5bf9e51f 82 ************************
julmbed 13:e1ba5bf9e51f 83 */
julmbed 0:85afbf3c9fad 84 VarItem *VarStore::GetVar(char *Name)
julmbed 0:85afbf3c9fad 85 {
julmbed 12:e9c8d2d9ac71 86 for (int i=0; i<sz; i++)
julmbed 0:85afbf3c9fad 87 if((strcmp(Name,Store[i].GetVarName()))==0)
julmbed 0:85afbf3c9fad 88 return &Store[i];
julmbed 0:85afbf3c9fad 89
julmbed 0:85afbf3c9fad 90 return NULL;
julmbed 0:85afbf3c9fad 91 }
julmbed 0:85afbf3c9fad 92
julmbed 13:e1ba5bf9e51f 93 /*
julmbed 13:e1ba5bf9e51f 94 ************************
julmbed 13:e1ba5bf9e51f 95 */
julmbed 0:85afbf3c9fad 96 char* VarStore::Get(char *Name)
julmbed 0:85afbf3c9fad 97 {
julmbed 0:85afbf3c9fad 98 VarItem *V;
julmbed 8:934ec53fe2c0 99 V=GetVar(Name);
julmbed 9:d081aa4e4418 100 if(V!=NULL)
julmbed 9:d081aa4e4418 101 return V->Dump();
julmbed 9:d081aa4e4418 102 else
julmbed 0:85afbf3c9fad 103 return NULL;
julmbed 0:85afbf3c9fad 104 }
julmbed 0:85afbf3c9fad 105
julmbed 13:e1ba5bf9e51f 106 /*
julmbed 13:e1ba5bf9e51f 107 ************************
julmbed 13:e1ba5bf9e51f 108 */
julmbed 10:34d368966675 109 void VarStore::Worker2()
julmbed 0:85afbf3c9fad 110 {
julmbed 8:934ec53fe2c0 111
julmbed 6:9848fdaf2ad9 112 static char c, *ret=STR_OK;// not NULL to start in no error state
julmbed 8:934ec53fe2c0 113
julmbed 6:9848fdaf2ad9 114 static int ci_counter=0;
julmbed 6:9848fdaf2ad9 115 static char Cs[CI_SZ];
julmbed 8:934ec53fe2c0 116 if(VarStore::MyThis->pc->readable()) {
julmbed 8:934ec53fe2c0 117 c=VarStore::MyThis->pc->getc();
julmbed 2:a59207652720 118
julmbed 13:e1ba5bf9e51f 119 if(ci_counter >= CI_SZ-1) { // RESET too much input
julmbed 8:934ec53fe2c0 120 ci_counter=0;
julmbed 8:934ec53fe2c0 121 Cs[0]='\0';
julmbed 8:934ec53fe2c0 122 } else {
julmbed 13:e1ba5bf9e51f 123 if(c=='\r') { // got a command lets see whan can be done
julmbed 8:934ec53fe2c0 124 Cs[ci_counter]='\0';
julmbed 8:934ec53fe2c0 125 ret=VarStore::MyThis->Do(Cs);
julmbed 0:85afbf3c9fad 126 ci_counter=0;
julmbed 0:85afbf3c9fad 127 Cs[0]='\0';
julmbed 13:e1ba5bf9e51f 128 } else { // no command yet, let's keep recording.
julmbed 8:934ec53fe2c0 129 Cs[ci_counter]=c;
julmbed 8:934ec53fe2c0 130 ci_counter++;
julmbed 0:85afbf3c9fad 131 }
julmbed 0:85afbf3c9fad 132 }
julmbed 8:934ec53fe2c0 133 }
julmbed 0:85afbf3c9fad 134
julmbed 13:e1ba5bf9e51f 135 if(ret==NULL) { // ups.....
julmbed 8:934ec53fe2c0 136 VarStore::MyThis->pc->puts(" error setting/getting var \n");
julmbed 8:934ec53fe2c0 137 ret=STR_OK;
julmbed 8:934ec53fe2c0 138 }
julmbed 8:934ec53fe2c0 139
julmbed 0:85afbf3c9fad 140 }
julmbed 0:85afbf3c9fad 141
julmbed 13:e1ba5bf9e51f 142 /*
julmbed 13:e1ba5bf9e51f 143 ** nuisances for mixing threads/static members etc
julmbed 13:e1ba5bf9e51f 144 */
julmbed 8:934ec53fe2c0 145 VarStore *VarStore::MyThis=NULL; // used by the worker reading the terminal. Need to be initilized this way to avoid
julmbed 8:934ec53fe2c0 146 // compiling errors
julmbed 13:e1ba5bf9e51f 147
julmbed 13:e1ba5bf9e51f 148 /*
julmbed 13:e1ba5bf9e51f 149 ************************
julmbed 13:e1ba5bf9e51f 150 */
julmbed 5:47b67a7c0bb7 151 void VarStore::Worker(void const *args)
julmbed 5:47b67a7c0bb7 152 {
julmbed 5:47b67a7c0bb7 153
julmbed 5:47b67a7c0bb7 154 VarStore::MyThis=(VarStore *)args;
julmbed 10:34d368966675 155 VarStore::MyThis->pc->attach(&VarStore::Worker2);
julmbed 5:47b67a7c0bb7 156 while(1) {
julmbed 13:e1ba5bf9e51f 157 Thread::wait(1000); // nothing to do here besides firing worker2 when input ready
julmbed 5:47b67a7c0bb7 158 }
julmbed 5:47b67a7c0bb7 159
julmbed 5:47b67a7c0bb7 160 }
julmbed 13:e1ba5bf9e51f 161 /*
julmbed 13:e1ba5bf9e51f 162 ************************
julmbed 13:e1ba5bf9e51f 163 */
julmbed 7:fafe81a95c08 164 char *VarStore::Do(char *str)
julmbed 2:a59207652720 165 {
julmbed 2:a59207652720 166 char *ret;
julmbed 2:a59207652720 167 if(str != NULL) {
julmbed 2:a59207652720 168
julmbed 2:a59207652720 169 switch(*str) {
julmbed 13:e1ba5bf9e51f 170 case 's': /// command s s:varname:value or s:arrayname:value1,value2,value3 assign values at runtime
julmbed 6:9848fdaf2ad9 171 return VarStore::MyThis->Set(str);
julmbed 13:e1ba5bf9e51f 172 case 'd': /// command d d:variablename dumps content of variable to screen/console.
julmbed 8:934ec53fe2c0 173
julmbed 9:d081aa4e4418 174 VarStore::MyThis->pc->puts(str);
julmbed 9:d081aa4e4418 175 VarStore::MyThis->pc->putc('\n');
julmbed 9:d081aa4e4418 176
julmbed 8:934ec53fe2c0 177 ret=strtok(str,":");
julmbed 8:934ec53fe2c0 178 ret=strtok(NULL,":");
julmbed 8:934ec53fe2c0 179
julmbed 8:934ec53fe2c0 180 ret=VarStore::MyThis->Get(ret);
julmbed 8:934ec53fe2c0 181
julmbed 2:a59207652720 182 if(ret!=NULL) {
julmbed 9:d081aa4e4418 183 VarStore::MyThis->pc->puts(ret);
julmbed 9:d081aa4e4418 184 VarStore::MyThis->pc->putc('\n');
julmbed 2:a59207652720 185 return ret;
julmbed 2:a59207652720 186 } else
julmbed 2:a59207652720 187 return NULL;
julmbed 13:e1ba5bf9e51f 188 case 'r': /// command r resets the mbed. If you previously downloaded a new version fo code, it will run.
julmbed 2:a59207652720 189 mbed_reset();
julmbed 2:a59207652720 190 return NULL;
julmbed 13:e1ba5bf9e51f 191 case 'w': /// command w waits a number of miliseconds releasing the input console to be used for other stuff temporarily
julmbed 3:cf43e6de918e 192 strtok(str,":");
julmbed 3:cf43e6de918e 193 Thread::wait(atoi(strtok(NULL,":")));
julmbed 3:cf43e6de918e 194 return STR_OK;
julmbed 2:a59207652720 195 };
julmbed 2:a59207652720 196 }
julmbed 2:a59207652720 197 return NULL;
julmbed 2:a59207652720 198 }
julmbed 2:a59207652720 199