AS400/IBMi中使用mkdir过程在IFS创建目录不显示问题问询

问题根因分析 #

• 最核心的触发原因是路径开头双斜杠的解析规则差异
  你代码中定义的路径为'//home/usr/'开头带两个连续斜杠：IBM i的C运行时mkdir函数处理路径时会自动将连续斜杠合并为单个，实际创建的是/home/usr/[产品名]路径；但WRKLNK命令解析路径时，开头的双斜杠会被识别为远程网络文件系统的路径前缀，会优先查找对应远程挂载点，找不到就抛出CPFA0A9路径不存在的错误。你用其他IFS工具访问时默认使用单斜杠开头的标准IFS路径，所以可以正常操作该目录。
• 次要排查点：mkdir调用无错误校验
  你当前代码调用mkdir后没有判断返回值，也没有获取错误码排查问题，如果出现上级目录不存在、权限不足等创建失败场景，也会出现后续校验找不到路径的问题。
• 特殊排查点：路径包含不可见字符
  如果£p1.pNomProduit参数中包含控制字符、尾部空字符，或者参数CCSID和IFS路径默认CCSID不匹配，也会导致路径解析不一致，出现不同工具校验结果不同的问题。

修复方案 #

1. 修正路径格式，将开头双斜杠改为单斜杠：

fullpath = '/home/usr/' + %trim(£p1.pNomProduit);

2. 新增mkdir错误校验逻辑，引入C标准库的__errno获取错误码排查问题：

// 先定义errno相关接口
D __errno         PR              *   ExtProc('__errno')
D errno           S             10I 0 Based(p_errno)

// 调用mkdir后新增校验
result = mkdir(fullpath:S_IRWXU+S_IRWXG+S_IRWXO);
if result < 0;
  p_errno = __errno();
  // 可根据errno判断错误：EEXIST=目录已存在、ENOENT=上级目录不存在、EACCES=权限不足
endif;

3. 确保Ctrl_Dossier函数的路径校验规则和实际创建路径的格式完全一致，避免出现判断逻辑错位。

内容的提问来源于stack exchange，提问作者Thomas ESCUDERO