使用状态机求浮点数真值

以下程序使用TC或VC编译均可,

运行时输入一个符点数,即可得到真值

/*
名称: ExpState.C
功能: 输入一个浮点数, 求其值
作者: Tary
日期: 2007-05-27
*/
#include <stdio.h>
#include <ctype.h>
#include <math.h>

enum tagSM_COLUMN{
/*符号, 数字,小数点,字母E, 其它字符 */
SMSIGN, SMDIGIT, SMDOT, SME, SMOTHER
}SM_COLUMN;

/* 状态转换数组      */
/* 行索引 ---- 当前状态     */
/* 列索引 ---- 当前读取的字符类型 */
/* 元素值 ---- 下一状态     */
char SM[9][5] = {
{ 1,    2,    3, 10, 10},
{10,    2,    3, 10, 10},
{ 9,    2,    4,    6,    9},
{10,    5, 10, 10, 10},
{ 9,    5,    9,    6,    9},
{ 9,    5,    9,    6,    9},
{ 7,    8, 10, 10, 10},
{10,    8, 10, 10, 10},
{ 9,    8,    9,    9,    9}};

/* 功能调用数组      */
/* 行索引 ---- 当前状态     */
/* 列索引 ---- 当前读取的字符类型 */
/* 元素值 ---- 要执行的功能函数Fx */
/*               下标x(0-7)    */
char FM[9][5] = {
{1, 2, 0, 7, 7},
{7, 2, 0, 7, 7},
{6, 2, 0, 0, 6},
{7, 3, 7, 7, 7},
{6, 3, 6, 0, 6},
{6, 3, 6, 0, 6},
{4, 5, 7, 7, 7},
{7, 5, 7, 7, 7},
{6, 5, 6, 6, 6}};

int nsign = 1, npsign = 1;    /* 尾数符号, 阶码符号 */
long nmpart = 0, nppart = 0;    /* 尾数整数部分, 阶码 */
float fdpart = 0.0, fresult = 0.0; /* 尾数小数部分, 浮点值 */

/*空操作*/
int f0(char ch){
return 0;
};

/*求尾数符号 */
int f1(char ch){
if (ch == '-')
    nsign = -1;
return 0;
};

/*求尾数整数部分*/
int f2(char ch){
nmpart = nmpart * 10 + (ch - '0');
return 0;
};

/*求尾数小数部分*/
int f3(char ch){
static float fds;

if (!ch) {
    fds = 0.1;
    fdpart = 0.0;
} else {
    fdpart += fds * (ch - '0');
    fds *= 0.1;
}
return 0;
};

/*求阶码符号 */
int f4(char ch){
if (ch == '-')
    npsign = -1;
return 0;
};

/*求阶码 */
int f5(char ch){
nppart = nppart * 10 + (ch - '0');
return 0;
};

/*求符点数的最终值 */
int f6(char ch){
fresult = nsign * (nmpart + fdpart) * pow(10, npsign * nppart);
return 0;
};

/*出现错误 */
int f7(char ch){
fresult = 0.0;
fprintf(stderr, "error resulution of the float number/n");
return 0;
};

int (*f[8])(char ch) = {f0, f1, f2, f3, f4, f5, f6, f7};

/* 取得字符类型 */
int chType(char ch){
if (ch == '+' || ch == '-'){
    return SMSIGN;
} else if (isdigit(ch)) {
    return SMDIGIT;
} else if (ch == '.'){
    return SMDOT;
} else if (ch == 'E' || ch == 'e') {
    return SME;
};
return SMOTHER;
}

/*状态机的执行部分 */
float getExp(){
static int nState = 0;
char ch;

/*
Use a finite state machine
to caculate the values of float point string
*/
f3(0);

while( 9 > nState ) {
    ch = getchar();
    (f[FM[nState][chType(ch)]])(ch);
    nState = (int)SM[nState][chType(ch)];
}
if (nState == 10)
    return 1;
return 0;
}

int main() {

if (!getExp())
    printf("getExp()=%.3e/n", fresult);
return 0;
}