MkObjectLog.cs

Go to the documentation of this file.

 
/* LABEL-NO */
 
/*****************************************************************************/
/*                                                                           */
/*                                   read                                    */
/*                                                                           */
/*****************************************************************************/
 
using System;
using System.Runtime.InteropServices;
using Mk = csmkkernel.MkKernel;
 
namespace csmkkernel {
 
  public partial class MkObjectC {
  
    public static int getPId() {
      return System.Diagnostics.Process.GetCurrentProcess().Id;
    }
  
    public static int getTId() {
      return System.Threading.Thread.CurrentThread.ManagedThreadId;
    }
  
    public static string getStackTrace(int level=2) {
      return Environment.StackTrace;
    }
  
    public static string getCallerProc(int level=2) {
      var sf = new System.Diagnostics.StackFrame(level);
      return sf.GetMethod().Name;
    }
  
    public static int getCallerLine(int level=2) {
      var sf = new System.Diagnostics.StackFrame(level);
      return sf.GetFileLineNumber();
    }
  
    public static string getCallerFile(int level=2) {
      var sf = new System.Diagnostics.StackFrame(level,true);
      return sf.GetFileName();
    }
  
    internal static void getCallerStack(ref string func, ref string file, ref int line, int level=2) {
      if (func != null && file != null && line != -1) return;
      var sf = new System.Diagnostics.StackFrame(level,true);
      if (func == null) {func = sf.GetMethod().Name;}
      if (file == null) {file = sf.GetFileName();}
      if (line == -1)   {line = sf.GetFileLineNumber();}
    }
 
#if CLR_DEBUG
    public static void SF(string msg, string name = null, int framelvl=1) {
      if (name == null) { name = getCallerProc(); }
      Console.Error.WriteLine("[pid=" + getPId() + ",tid=" + getTId() + ",caller={0,-25}] -> {1,-15} = " + msg, 
                        getCallerProc(framelvl+1), name);
    }
    public static void printVal(IntPtr ptr, string name=null, int framelvl=1) {
      if (name == null) { name = getCallerProc(); }
      if (ptr == IntPtr.Zero) {
        SF("null", name, framelvl+1);
      } else {
        SF("0x" + ptr.ToString("x"), name, framelvl+1);
      }
    }
    public static void printVal(byte bol, string name=null, int framelvl=1) {
      if (name == null) { name = getCallerProc(); }
      SF(bol.ToString(), name, framelvl+1);
    }
    public static void printVal(bool bol, string name=null, int framelvl=1) {
      if (name == null) { name = getCallerProc(); }
      SF(bol.ToString(), name, framelvl+1);
    }
    public static void printVal(object id, string name=null, int framelvl=1) {
      if (name == null) { name = getCallerProc(); }
      if (id == null) {
        SF("type=null " + id.GetType().ToString(), name, framelvl+1);
      } else {
        SF("type=" + id.GetType().ToString() + ", value=" + id, name, framelvl+1);
      }
    }
    public static void printVal(string id, string name=null, int framelvl=1) {
      if (name == null) { name = getCallerProc(); }
      SF(id.ToString(), name, framelvl+1);
    }
    public static void printTyp(IntPtr id, string name=null, int framelvl=1) {
      if (name == null) { name = getCallerProc(); }
      if (id == IntPtr.Zero) {
        SF("NULL", name, framelvl+1);
      } else {
        SF(MkObjectC.Name(IntPtr.Zero, id), name, framelvl+1);
        //Mk.MqLogObjDetail(id,IntPtr.Zero,0,name,0);
      }
    }
    public static void printStack(string name=null, int framelvl=1) {
      if (name == null) { name = getCallerProc(); }
      System.Diagnostics.StackTrace st = new System.Diagnostics.StackTrace(true);
      for(int i =framelvl; i< st.FrameCount; i++ )
      {
          // Note that at this level, there are four
          // stack frames, one for each method invocation.
          System.Diagnostics.StackFrame sf = st.GetFrame(i);
          SF(String.Format("[{0}] {1}",i ,sf.GetMethod()), name, framelvl+1);
      }
    }
    public static void printTyp(MkObjectC obj, string name=null, int framelvl=1) {
      printTyp(obj.hdl,name,framelvl+1);
    }
    public static void M0(string name="M0") { SF("M0000000000000",name,2); }
    public static void M1(string name="M1") { SF("M1111111111111",name,2); }
    public static void M2(string name="M2") { SF("M2222222222222",name,2); }
    public static void M3(string name="M3") { SF("M3333333333333",name,2); }
    public static void M4(string name="M4") { SF("M4444444444444",name,2); }
    public static void M5(string name="M5") { SF("M5555555555555",name,2); }
    public static void M6(string name="M6") { SF("M6666666666666",name,2); }
    public static void M7(string name="M7") { SF("M7777777777777",name,2); }
    public static void M8(string name="M8") { SF("M8888888888888",name,2); }
    public static void M9(string name="M9") { SF("M9999999999999",name,2); }
    public static void MA(string name="MA") { SF("MAAAAAAAAAAAAA",name,2); }
    public static void MB(string name="MB") { SF("MBBBBBBBBBBBBB",name,2); }
    public static void MC(string name="MC") { SF("MCCCCCCCCCCCCC",name,2); }
    public static void MD(string name="MD") { SF("MDDDDDDDDDDDDD",name,2); }
    public static void ME(string name="ME") { SF("MEEEEEEEEEEEEE",name,2); }
#endif // CLR_DEBUG
  }
 
  public partial class MkObjectC
  {
 
 
#if CLR_DEBUG
 
    private void SL(string txt) {
      IntPtr caller_cstr = Marshal.StringToHGlobalAnsi(getCallerProc());
      IntPtr message_cstr = Marshal.StringToHGlobalAnsi(this + ":\n" + txt + "\n");
      Mk.MkLogC(IntPtr.Zero,hdl,message_cstr,0,caller_cstr);
      Marshal.FreeHGlobal(message_cstr);
      Marshal.FreeHGlobal(caller_cstr);
    }
 
    public void L0() { SL("0000000000000"); }
    public void L1() { SL("1111111111111"); }
    public void L2() { SL("2222222222222"); }
    public void L3() { SL("3333333333333"); }
    public void L4() { SL("4444444444444"); }
    public void L5() { SL("5555555555555"); }
    public void L6() { SL("6666666666666"); }
    public void L7() { SL("7777777777777"); }
    public void L8() { SL("8888888888888"); }
    public void L9() { SL("9999999999999"); }
    public void LA() { SL("AAAAAAAAAAAAA"); }
    public void LB() { SL("BBBBBBBBBBBBB"); }
    public void LC() { SL("CCCCCCCCCCCCC"); }
    public void LE() { SL("EEEEEEEEEEEEE"); }
 
    public void printL(string name, Object val ) { SL("["+name + ":" + val + "]"); }
#endif // CLR_DEBUG
 
 
  } // END - class "MqContextC"
 
} // END - namespace "csmkkernel.mqmsgque"