/// <summary> /// 输出对象_枚举条目. /// </summary> /// <param name="iw">带缩进输出者.</param> /// <param name="obj">object.</param> /// <param name="context">Context.</param> /// <param name="tp">类型.</param> public virtual void WriterObject_WriteEnumerate(IIndentedWriter iw, object obj, IndentedWriterContext context, Type tp) { if (0 != (m_Options & IndentedObjectFunctorOptions.NoEnumerate)) { return; } IEnumerable lst = obj as IEnumerable; if (null == lst) { return; } int i = 0; foreach (object p in lst) { string name = string.Format("[{0}]", i); IndentedWriterObjectProc proc = null; if (null != context) { proc = IndentedWriterUtil.LookupWriteProcAt(p, context, context.Procs); } if (null == proc && (m_WriterOptions & IndentedWriterMemberOptions.NoCommonProcs) == 0) { if (IndentedObjectFunctor.CommonProc(null, p, context)) { proc = IndentedObjectFunctor.CommonProc; } } IndentedWriterUtil.WriteLineValue(iw, name, p, IndentedWriterValueOptions.Default, null); if (null != proc) { proc(iw, p, context); } // next. ++i; } }
/// <summary> /// 输出对象的各个成员. /// </summary> /// <param name="iw">带缩进输出者.</param> /// <param name="owner">欲查询成员的对象. 查询静态成员时可以设为 null.</param> /// <param name="tp">类型. 当 <paramref name="owner"/> 非 null 时, 可设为null, 即自动设为 <c>owner.GetType()</c> . </param> /// <param name="options">成员选项. 实际的成员选项是本参数与 <see cref="IndentedWriterContext.MemberOptions"/> 属性做或运算后的值. </param> /// <param name="handle">每个成员的处理过程, 可以为 null. 默认在调用时会将其 <c>sender</c>参数设为null. </param> /// <param name="context">环境对象, 可以为 null. 会嵌套传递. </param> /// <returns>是否成功.</returns> public static bool ForEachMember(IIndentedWriter iw, object owner, Type tp, IndentedWriterMemberOptions options, EventHandler <IndentedWriterMemberEventArgs> handle, IndentedWriterContext context) { bool rt = false; if (null == tp) { if (null == owner) { return(rt); } tp = owner.GetType(); } if (null == owner && (options & IndentedWriterMemberOptions.OnlyStatic) == 0) { throw new ArgumentException("options not has Static, but owner is null.", "bindingAttr"); } // notify begin. if (null == context) { context = new IndentedWriterContext(); // 自动创建环境. 有可能以后调整设计, 所以后面还是检查 context. } if (null != context) { if (!context.NotifyForEachMemberBegin(iw, owner, tp, options, handle, context)) { return(false); } } // args IndentedWriterMemberEventArgs args = new IndentedWriterMemberEventArgs(); args.IsCancel = false; args.IsCancelAll = false; args.HasDefault = false; args.IndentedWriter = iw; args.Owner = owner; args.OwnerType = tp; args.MemberOptions = options; //args.Procs = procs; args.Context = context; // foreach. IndentedWriterMemberOptions realoptions = options; if (null != context) { realoptions |= context.MemberOptions; } foreach (MemberInfo mi in GetMembers(tp, realoptions)) { string AppendComment2 = null; // 备用的附加注释. 可能会在 args.AppendComment 为null时 使用. args.IsCancel = true; args.HasDefault = false; args.MemberInfo = mi; args.MemberName = TypeUtil.GetMemberNameAuto(mi, DefaultMemberNameOption); //mi.Name; args.Value = null; args.ValueOptions = IndentedWriterValueOptions.ExistValue; args.AppendComment = null; args.WriteProc = null; //Debug.WriteLine(mi.ToString()); // //bool bOk = false; //object value = null; //IndentedWriterObjectProc writeproc = null; //IndentedWriterValueOptions iwvo = IndentedWriterValueOptions.ExistValue; //bool isdefault = false; // get value. if (false) { } else if (mi is FieldInfo) { FieldInfo fi = mi as FieldInfo; args.IsCancel = false; if (true) { try { args.Value = fi.GetValue(owner); args.ValueOptions = IndentedWriterValueOptions.Default; args.HasDefault = true; AppendComment2 = string.Format("<{0}>", fi.FieldType.Name); } catch (Exception ex) { Debug.WriteLine(ex); } } } else if (mi is PropertyInfo) { PropertyInfo pi = mi as PropertyInfo; args.IsCancel = false; if (pi.CanRead && pi.GetIndexParameters().Length <= 0) { try { args.Value = pi.GetValue(owner, null); args.ValueOptions = IndentedWriterValueOptions.Default;; args.HasDefault = true; AppendComment2 = string.Format("<{0}>", pi.PropertyType.Name); } catch (Exception ex) { Debug.WriteLine(ex); } } } else if (mi is MethodInfo) { if ((realoptions & IndentedWriterMemberOptions.AllowMethod) != 0) { MethodInfo methodinfo = mi as MethodInfo; args.IsCancel = false; args.ValueOptions = IndentedWriterValueOptions.AutoHideValue; //args.MemberName = string.Format("{0}()", mi.Name); AppendComment2 = string.Format("<{0}>", methodinfo.ReturnType.Name); } } if (args.IsCancel) { continue; } // get proc. if (null != args.Value) { //args.WriteProc = LookupWriteProcAt(args.Value, context, procs); if (null != context) { args.WriteProc = LookupWriteProcAt(args.Value, context, context.Procs); } //if (null == args.WriteProc && (realoptions & IndentedWriterMemberOptions.NoDefaultProcs) == 0) { // args.WriteProc = LookupWriteProc(args.Value, context); //} if (null == args.WriteProc && (realoptions & IndentedWriterMemberOptions.NoCommonProcs) == 0) { if (IndentedObjectFunctor.CommonProc(null, args.Value, context)) { args.WriteProc = IndentedObjectFunctor.CommonProc; } } } // handle if (null != handle) { //handle(context, mi, value, ref writeproc, ref iwvo, ref isdefault); handle(null, args); } if (args.IsCancelAll) { break; } if (args.IsCancel) { continue; } // show. if (args.HasDefault) { if (null == args.Value && null == args.AppendComment) { args.AppendComment = AppendComment2; } WriteLineValue(iw, args.MemberName, args.Value, args.ValueOptions, args.AppendComment); if (null != args.WriteProc) { args.WriteProc(iw, args.Value, context); } } } // notify begin. if (null != context) { context.NotifyForEachMemberEnd(iw, owner, tp, options, handle, context); } rt = true; return(rt); }
/// <summary> /// 输出派生类及成员. /// </summary> /// <param name="iw">带缩进输出者.</param> /// <param name="basetype">Base Class type.</param> /// <param name="assembly">Assembly.</param> /// <param name="context">State Object. Can be null.</param> /// <returns>返回是否成功输出.</returns> public static bool WriteDerivedClass(IIndentedWriter iw, Type basetype, Assembly assembly, IndentedWriterContext context) { if (null == iw) { return(false); } if (null == basetype) { return(false); } //Type basetype = typeof(Calendar); #if (NETFX_CORE) TypeInfo tiBase = basetype.GetTypeInfo(); #endif //Assembly assembly = basetype.Assembly; if (null == assembly) { #if (NETFX_CORE) assembly = tiBase.Assembly; #else assembly = basetype.Assembly; #endif } if (!iw.Indent(basetype)) { return(false); } iw.WriteLine("# DerivedClass of <{0}>:", basetype.FullName); int cnt = 0; IEnumerable <Type> lst = null; #if (NETFX_CORE) lst = assembly.ExportedTypes; #else lst = assembly.GetExportedTypes(); #endif foreach (Type tp in lst) { // check. #if (NETFX_CORE) TypeInfo ti = tp.GetTypeInfo(); if (!ti.IsAssignableFrom(tiBase)) { continue; } #else if (tp.IsAbstract) { continue; } if (!tp.IsSubclassOf(basetype)) { continue; } #endif // new. object ob = null; try { ob = Activator.CreateInstance(tp); } catch { // 忽略. } if (null == ob) { continue; } // write. iw.WriteLine("DerivedClass[{0}]:\t# <{1}>", cnt, tp.Name); WriteTypeStatic(iw, tp, context); IndentedObjectFunctor.CommonProc(iw, ob, context); ++cnt; } iw.Unindent(); return(true); }