# C 语言标准库头文件 fenv.h

#include <stdio.h>
#include <fenv.h>
#include <math.h>
#include <errno.h>

void show_exceptions(void) {
    printf("当前浮点异常状态: ");
    if (fetestexcept(FE_ALL_EXCEPT) == 0) {
        printf("无异常\n");
        return;
    }
    
    if (fetestexcept(FE_DIVBYZERO)) printf("除零异常 ");
    if (fetestexcept(FE_INVALID))   printf("无效操作异常 ");
    if (fetestexcept(FE_OVERFLOW))  printf("上溢异常 ");
    if (fetestexcept(FE_UNDERFLOW)) printf("下溢异常 ");
    if (fetestexcept(FE_INEXACT))   printf("不精确结果异常 ");
    printf("\n");
}

void show_rounding_mode(void) {
    printf("当前舍入模式: ");
    switch (fegetround()) {
        case FE_TONEAREST:  printf("四舍五入\n"); break;
        case FE_DOWNWARD:   printf("向负无穷方向舍入\n"); break;
        case FE_UPWARD:     printf("向正无穷方向舍入\n"); break;
        case FE_TOWARDZERO: printf("向零舍入\n"); break;
        default:            printf("未知模式\n");
    }
}

int main(void) {
    // 1. 显示初始浮点环境
    printf("=== 初始浮点环境 ===\n");
    show_exceptions();
    show_rounding_mode();
    printf("\n");
    
    // 2. 触发浮点异常示例
    printf("=== 触发浮点异常 ===\n");
    feclearexcept(FE_ALL_EXCEPT);  // 清除所有异常标志
    
    // 除零异常
    double x = 1.0, y = 0.0;
    double z = x / y;
    printf("1.0 / 0.0 = %f\n", z);
    show_exceptions();
    
    // 无效操作异常
    double a = sqrt(-1.0);
    printf("sqrt(-1.0) = %f\n", a);
    show_exceptions();
    printf("\n");
    
    // 3. 舍入模式控制示例
    printf("=== 舍入模式控制 ===\n");
    fesetround(FE_DOWNWARD);  // 设置为向负无穷舍入
    show_rounding_mode();
    
    double num = 1.75;
    printf("1.75 舍入后: %f\n", rint(num));
    
    fesetround(FE_UPWARD);    // 设置为向正无穷舍入
    show_rounding_mode();
    printf("1.75 舍入后: %f\n", rint(num));
    
    fesetround(FE_TONEAREST); // 恢复默认舍入模式
    printf("\n");
    
    // 4. 浮点环境保存与恢复
    printf("=== 环境保存与恢复 ===\n");
    fenv_t env;
    fegetenv(&env);  // 保存当前环境
    
    // 修改环境
    fesetround(FE_TOWARDZERO);
    feclearexcept(FE_ALL_EXCEPT);
    
    printf("修改后的环境:\n");
    show_rounding_mode();
    show_exceptions();
    
    fesetenv(&env);  // 恢复原始环境
    printf("\n恢复后的环境:\n");
    show_rounding_mode();
    show_exceptions();
    
    return 0;
}