第 14 章 结构和其他数据形式（函数指针）

/*------------------------------
    func_ptr.c -- 使用函数指针
------------------------------*/

#include <stdio.h>
#include <string.h>
#include <ctype.h>

#define LEN 81

char* s_gets(char *st, int n);
char showmenu(void);
void eatline(void);            //读取至行末尾
void ToUpper(char*);        //把字符串转换为大写
void ToLower(char*);        //把字符串转换为小写
void Transpose(char*);        //大小写转换
void Dummy(char*);            //不更改字符串
void show(void (*fp)(char*), char *str);


int main()
{
    char line[LEN], copy[LEN];
    char choice;
    void (*pfn)(char*);        //声明函数指针

    puts("Enter a string (empty line to quit):");

    while (s_gets(line, LEN) != NULL && line[0] != '')
    {
        while ((choice = showmenu()) != '
')
        {
            switch (choice)
            {
            case 'u': pfn = ToUpper;    break;
            case 'l': pfn = ToLower;    break;
            case 't': pfn = Transpose;    break;
            case 'o': pfn = Dummy;        break;
            }

            strcpy(copy, line);        //为 show() 函数拷贝一份
            show(pfn, copy);        //根据用户选择，使用选定的函数
        }

        puts("Enter a string (empty line to quit):");
    }

    puts("Bye!");

    return 0;
}

char showmenu()
{
    char ans;

    puts("Enter menu choice:");
    puts("u) uppercase         1) lowercase");
    puts("t) transposed case o) original case");
    puts("n) next string");

    ans = tolower(fgetc(stdin));    //获取用户输入,转换为小写
    eatline();                        //清理输入行

    while (strchr("ulton", ans) == NULL)
    {
        puts("Please enter a u, l, t, o, or n:");
        ans = tolower(fgetc(stdin));
        eatline();
    }

    return ans;
}

void eatline(void)
{
    while (fgetc(stdin) != '
') continue;
}

void ToUpper(char *str)
{
    while (*str)
    {
        *str = toupper(*str);
        ++str;
    }
}

void ToLower(char *str)
{
    while (*str)
    {
        *str = tolower(*str);
        ++str;
    }
}

void Transpose(char *str)
{
    while (*str)
    {
        if (islower(*str))
            *str = toupper(*str);
        else if (isupper(*str))
            *str = tolower(*str);

        ++str;
    }
}

void Dummy(char *str)
{
    //do nothing
}

void show(void (*fp)(char*), char *str)
{
    (*fp)(str);        //把用户选定的函数作用于str
    puts(str);        //显示结果
}

char* s_gets(char *st, int n)
{
    char *ret_val, *find;

    if (ret_val = fgets(st, n, stdin))
    {
        if (find = strchr(st, '
'))
            *find = '';
        else
            while (fgetc(stdin) != '
') continue;
    }

    return ret_val;
}