/vqdr/trunk

To get this branch, use:
bzr branch http://gegoxaren.bato24.eu/bzr/vqdr/trunk

« back to all changes in this revision

Viewing changes to src/utils/utils.vala

  • Committer: Gustav Hartvigsson
  • Date: 2022-05-30 18:38:18 UTC
  • Revision ID: gustav.hartvigsson@gmail.com-20220530183818-wv8qb16e1e3cu4tk
Added test for NamedVector

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/utils/utils.vala
1
 
namespace VQDR.Common.Utils {
 
1
/*
 
2
 * The contects of this file is in the Public Domain.
 
3
 *
 
4
 * Created by Gustav Hartivgsson.
 
5
 */
 
6
 
 
7
namespace Utils {
2
8
  public int str_cmp (string a, string b) {
3
9
    return a.collate (b);
4
10
  }
5
11
  
6
12
  public void print_ln (string str, ...) {
7
13
    var va = va_list ();
8
 
    
9
 
    // Reallocate the string as it is not owned by the function.
10
 
    var tmp = str + "\n";
11
 
    
12
 
    // Hopefully this does not create any memony leaks. :-)
13
 
    print (tmp.vprintf (va));
 
14
    var tmp = str + "\n";
 
15
    stdout.vprintf (tmp, va);
 
16
  }
 
17
 
 
18
  public void err_print_ln (string str, ...) {
 
19
    var va = va_list ();
 
20
    var tmp = str + "\n";
 
21
    stderr.vprintf (tmp, va);
14
22
  }
15
23
  
16
24
  public string object_to_string (GLib.Object obj) {
17
 
    GLib.ObjectClass real_obj = (GLib.ObjectClass) obj.get_type ().class_ref ();
18
 
    
19
 
    var str_builder = new GLib.StringBuilder ();
20
 
    
21
 
    
22
 
    str_builder.append ("(")
 
25
     StringBuilder strbldr = new StringBuilder ();
 
26
     internal_object_to_string (obj, ref strbldr);
 
27
     return strbldr.str;
 
28
  }
 
29
 
 
30
  string collect_string (string[] segments) {
 
31
    if (segments.length == 0) {
 
32
      return "";
 
33
    }
 
34
    if (segments.length == 1) {
 
35
      return segments[0];
 
36
    }
 
37
    StringBuilder strbldr = new StringBuilder ();
 
38
    foreach (var segment in segments) {
 
39
      strbldr.append (segment);
 
40
    }
 
41
    return strbldr.str;
 
42
  }
 
43
 
 
44
  private unowned StringBuilder internal_object_to_string (GLib.Object obj,
 
45
                                                  ref StringBuilder str_builder,
 
46
                                                  int nesting = 0) {
 
47
    GLib.ObjectClass obj_class = (GLib.ObjectClass) obj.get_type ().class_ref ();
 
48
    
 
49
    for (var i = 0; i < nesting; i++) {
 
50
     str_builder.append ("\t");
 
51
    }
 
52
    
 
53
    str_builder.append ("((")
23
54
               .append (obj.get_type().name ())
24
 
               .append ("):\n");
 
55
               .append_printf (")->(%p):\n", obj);
25
56
    
26
 
    foreach (GLib.ParamSpec ps in real_obj.list_properties ()) {
 
57
    foreach (GLib.ParamSpec ps in obj_class.list_properties ()) {
27
58
      
28
59
      if (ps.value_type == 0 || ps.value_type == GLib.Type.INVALID) {
29
60
        continue;
36
67
      if (prop_val.type () == GLib.Type.INVALID || prop_val.type () == 0) {
37
68
        continue;
38
69
      }
39
 
      
 
70
 
40
71
      obj.get_property (prop_name, ref prop_val);
41
72
      
42
 
      
43
 
      str_builder.append ("\t (")
 
73
      for (var i = 0; i < nesting; i++) {
 
74
        str_builder.append ("\t");
 
75
      }
 
76
 
 
77
      str_builder.append ("\t(")
44
78
                 .append (prop_val.type_name ())
45
79
                 .append (") ")
46
80
                 .append (prop_name)
47
 
                 .append (": ");
 
81
                 .append (":");
 
82
 
 
83
 
48
84
      
49
85
      
50
86
      switch (prop_val.type ()) {
51
87
        case (GLib.Type.STRING):
52
 
          str_builder.append (prop_val.get_string ());
 
88
          if (prop_val.dup_string () == null) {
 
89
            str_builder.append ("(null)");
 
90
          } else {
 
91
            str_builder.append (prop_val.dup_string ());
 
92
          }
53
93
        break;
54
94
        case (GLib.Type.INT):
55
95
          str_builder.append (prop_val.get_int ().to_string ());
71
111
          str_builder.append (prop_val.get_enum ().to_string ());
72
112
        break;
73
113
        case (GLib.Type.FLAGS):
74
 
          // Probobly needs better handling, but this will do.
 
114
          // TODO: Probobly needs better handling, but this will do.
75
115
          str_builder.append (prop_val.get_flags ().to_string ());
76
116
        break;
77
117
        case (GLib.Type.FLOAT):
83
123
        case (GLib.Type.LONG):
84
124
          str_builder.append (prop_val.get_long ().to_string ());
85
125
        break;
86
 
        case (GLib.Type.OBJECT):
87
 
          str_builder.append_printf ("%llX", (((long)((pointer)prop_val.get_object ()))));
88
 
        break;
89
 
        case (GLib.Type.PARAM):
90
 
          var spsc = prop_val.get_param ();
91
 
          str_builder.append ("name: ")
92
 
                     .append (spsc.name)
93
 
                     .append (" type: ")
94
 
                     .append (spsc.value_type.name ());
95
 
        break;
96
126
        case (GLib.Type.POINTER):
97
 
          str_builder.append_printf ("%llX", (((long)prop_val.get_pointer ())));
 
127
          str_builder.append ("(")
 
128
                     .append_printf ("%p", prop_val.get_pointer ());
 
129
          str_builder.append (")");
 
130
        break;
 
131
        case (GLib.Type.BOXED):
 
132
          str_builder.append ("(")
 
133
                     .append_printf ("%p", prop_val.get_boxed ());
 
134
          str_builder.append (")");
98
135
        break;
99
136
        case (GLib.Type.UCHAR):
100
137
          var v = prop_val.get_uchar ();
113
150
          str_builder.append (prop_val.get_ulong ().to_string ());
114
151
        break;
115
152
        case (GLib.Type.VARIANT):
116
 
          GLib.Variant v = prop_val.get_variant ();
117
 
          str_builder.append ("(\n")
118
 
                     .append (v.print (true))
119
 
                     .append ("\n)");
 
153
          GLib.Variant v = prop_val.dup_variant ();
 
154
          GLib.Variant? tv = null;
 
155
          unowned string ts1 = v.get_type_string ();
 
156
          str_builder.append ("")
 
157
                     .append (ts1)
 
158
                     .append ("\n\t(\n");
 
159
          GLib.VariantIter iter = v.iterator ();
 
160
          tv = iter.next_value ();
 
161
          while (tv != null) {
 
162
            unowned string ts2 = tv.get_type_string ();
 
163
            string tp = tv.print (true);
 
164
            str_builder.append ("\t\t((")
 
165
                       .append (ts2)
 
166
                       .append ("): ")
 
167
                       .append (tp)
 
168
                       .append (")\n");
 
169
            tv = iter.next_value ();
 
170
          }
 
171
          
120
172
        break;
121
 
      }
 
173
 
 
174
      }
 
175
      if (prop_val.type ().is_a (typeof (GLib.Object))) {
 
176
        var new_nesting = nesting + 1;
 
177
        GLib.Object? dup_obj = prop_val.dup_object ();
 
178
        str_builder.append_printf ("->(%p):\n", dup_obj);
 
179
        internal_object_to_string (dup_obj, ref str_builder, new_nesting);
 
180
      }
 
181
 
122
182
      str_builder.append ("\n");
123
 
      
124
 
    }
125
 
    
126
 
    return str_builder.str;
 
183
    }
 
184
    for (var i = 0; i < nesting; i++) {
 
185
      str_builder.append ("\t");
 
186
    }
 
187
    str_builder.append (")\n");
 
188
    return str_builder;
127
189
  }
128
190
  
129
191
}