摘要

面向对象风格和函数式编程风格是编写代码的两种风格，面向对象风格早为大众所认知，函数式风格也渐渐受到大家的关注。网上为其布道的文章不少，有人赞扬有人不屑，但鲜有展示一个完整例子的。例如很多人对函数式风格的印象只是“有人说它很好，但不清楚到底好在哪儿，更不知如何在实际的项目中获益”。

本文将采用C语言解决一个问题，围绕这个问题不断地变化需求、重构代码，分别展示两种风格如何从不同的侧面提高代码的可维护性。如果你没有耐心读完这篇长文章，可以参见下面的代码，但这篇文章会向你解释为什么代码会写成这样，以及写成这样的好处。

注：本文纯属个人观点，如有雷同，非常荣幸！因为文章有点长，所以我把完整的文章做成PDF并上传到“微盘”供大家下载：http://vdisk.weibo.com/s/vgdyUZmwZ2l4/1376725867。

问题描述

作为贯穿全文的主线，这有一个问题需要你开发一个C程序来完成任务：有一个存有职员信息（姓名、年龄、工资）的文件“work.txt”，内容如下：

William 35 25000
Kishore 41 35000
Wallace 37 20000
Bruce 39 15000

1. 要求从文件中读取这些信息，并输出到屏幕上；
2. 为所有工资小于三万的员工涨3000元；
3. 在屏幕上输出薪资调整后的结果；
4. 把调整后的结果保存到原始文件。

即运行的结果是屏幕上要有八行输出，“work.txt”的内容将变成：

William 35 28000
Kishore 41 35000
Wallace 37 23000
Bruce 39 18000

最终代码

#include <stdlib.h>
#include <stdio.h>

typedef char String[32];
typedef FILE* File;

typedef struct _Employee {
  String name;
  int age;
  int salary;
  struct _Employee *next;
} *Employee;

typedef void (*Callback)(Employee);

/* High Order Functions  */
void foreach(Employee e, Callback fn) {
  Employee p;
  while (p = e) {
    e = e->next;                /* Avoid *next be changed in fn */
    fn(p);
  }
}

void with_open_file(String filename, String mode, Callback fn, Employee e) {
  File file = freopen(filename, mode, (mode[0] == 'r'? stdin: stdout));
  if (file == NULL) {
    fprintf(stderr, "Cannot open %s with %s mode.\n", filename, mode);
    exit(EXIT_FAILURE);
  }
  fn(e);
  fclose(file);
}

/* Destructor */
static void employee_free_node(Employee e) {
  if (e != NULL) {
    free(e);
  }
}

void employee_free(Employee e) {
  foreach(e, employee_free_node);
}

/* Input */
static void employee_read_node(Employee node) {
  Employee e = NULL, *head = (Employee*) node;
  e = *head = (Employee)calloc(1, sizeof(struct _Employee));
  if (e != NULL && scanf("%s%d%d", e->name, &e->age, &e->salary) != 3) {
    employee_free(e);
    *head = NULL;
  }
}

void employee_read(Employee list) {
  Employee e = NULL, *head = (Employee*) list, tail = NULL;

  *head = NULL;
  while (employee_read_node((Employee)&e), e) {
    if (*head != NULL) {
      tail->next = e;
      tail = e;
    } else {
      *head = tail = e;
    }
  }
}

/* Output */
static void employee_print_node(Employee e) {
  printf("%s %d %d\n", e->name, e->age, e->salary);
}

void employee_print(Employee e) {
  foreach(e, employee_print_node);
}

/* Business Logic */
static void employee_adjust_salary_node(Employee e) {
  if (e->salary < 30000) {
    e->salary += 3000;
  }
}

void employee_adjust_salary(Employee e) {
  foreach(e, employee_adjust_salary_node);
}

int main(void) {
  Employee e = NULL;

  with_open_file("work.txt", "r", employee_read, (Employee)&e);
  employee_print(e);

  employee_adjust_salary(e);
  employee_print(e);
  with_open_file("work.txt", "w", employee_print, e);

  employee_free(e);

  return EXIT_SUCCESS;
}