?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
s4-torture: smb2 copychunk data integrity checks
[Samba/gbeck.git] / source3 / registry / reg_perfcount.c
blob64e3cbee0f686e7412b301803b9d69f1b14f9781
1 /*
2 * Unix SMB/CIFS implementation.
3 * Virtual Windows Registry Layer
4 *
5 * Copyright (C) Marcin Krzysztof Porwit 2005,
6 * Copyright (C) Gerald (Jerry) Carter 2005.
7 *
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 3 of the License, or
11 * (at your option) any later version.
12 *
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, see <http://www.gnu.org/licenses/>.
20 */
21
22 #include "includes.h"
23 #include "system/filesys.h"
24 #include "../librpc/gen_ndr/perfcount.h"
25 #include "registry.h"
26 #include "reg_perfcount.h"
27 #include "../libcli/registry/util_reg.h"
28 #include "util_tdb.h"
29
30 #undef DBGC_CLASS
31 #define DBGC_CLASS DBGC_REGISTRY
32
33 #define PERFCOUNT_MAX_LEN 256
34
35 #define PERFCOUNTDIR "perfmon"
36 #define NAMES_DB "names.tdb"
37 #define DATA_DB "data.tdb"
38
39 struct PERF_OBJECT_TYPE *_reg_perfcount_find_obj(struct PERF_DATA_BLOCK *block, int objind);
40
41 /*********************************************************************
42 *********************************************************************/
43
44 static char *counters_directory(const char *dbname)
45 {
46 char *path = NULL;
47 char *ret = NULL;
48 TALLOC_CTX *ctx = talloc_tos();
49
50 path = state_path(PERFCOUNTDIR);
51 if (!directory_exist(path)) {
52 mkdir(path, 0755);
53 }
54
55 path = talloc_asprintf(ctx, "%s/%s", PERFCOUNTDIR, dbname);
56 if (!path) {
57 return NULL;
58 }
59
60 ret = talloc_strdup(ctx, state_path(path));
61 TALLOC_FREE(path);
62 return ret;
63 }
64
65 /*********************************************************************
66 *********************************************************************/
67
68 uint32 reg_perfcount_get_base_index(void)
69 {
70 const char *fname = counters_directory( NAMES_DB );
71 TDB_CONTEXT *names;
72 TDB_DATA kbuf, dbuf;
73 char key[] = "1";
74 uint32 retval = 0;
75 char buf[PERFCOUNT_MAX_LEN];
76
77 names = tdb_open_log(fname, 0, TDB_DEFAULT, O_RDONLY, 0444);
78
79 if ( !names ) {
80 DEBUG(1, ("reg_perfcount_get_base_index: unable to open [%s].\n", fname));
81 return 0;
82 }
83 /* needs to read the value of key "1" from the counter_names.tdb file, as that is
84 where the total number of counters is stored. We're assuming no holes in the
85 enumeration.
86 The format for the counter_names.tdb file is:
87 key value
88 1 num_counters
89 2 perf_counter1
90 3 perf_counter1_help
91 4 perf_counter2
92 5 perf_counter2_help
93 even_num perf_counter<even_num>
94 even_num+1 perf_counter<even_num>_help
95 and so on.
96 So last_counter becomes num_counters*2, and last_help will be last_counter+1 */
97 kbuf = string_tdb_data(key);
98 dbuf = tdb_fetch_compat(names, kbuf);
99 if(dbuf.dptr == NULL)
100 {
101 DEBUG(1, ("reg_perfcount_get_base_index: failed to find key \'1\' in [%s].\n", fname));
102 tdb_close(names);
103 return 0;
104 }
105 else
106 {
107 tdb_close(names);
108 memset(buf, 0, PERFCOUNT_MAX_LEN);
109 memcpy(buf, dbuf.dptr, dbuf.dsize);
110 retval = (uint32)atoi(buf);
111 SAFE_FREE(dbuf.dptr);
112 return retval;
113 }
114 return 0;
115 }
116
117 /*********************************************************************
118 *********************************************************************/
119
120 uint32 reg_perfcount_get_last_counter(uint32 base_index)
121 {
122 uint32 retval;
123
124 if(base_index == 0)
125 retval = 0;
126 else
127 retval = base_index * 2;
128
129 return retval;
130 }
131
132 /*********************************************************************
133 *********************************************************************/
134
135 uint32 reg_perfcount_get_last_help(uint32 last_counter)
136 {
137 uint32 retval;
138
139 if(last_counter == 0)
140 retval = 0;
141 else
142 retval = last_counter + 1;
143
144 return retval;
145 }
146
147
148 /*********************************************************************
149 *********************************************************************/
150
151 static uint32 _reg_perfcount_multi_sz_from_tdb(TDB_CONTEXT *tdb,
152 int keyval,
153 char **retbuf,
154 uint32 buffer_size)
155 {
156 TDB_DATA kbuf, dbuf;
157 char temp[256];
158 char *buf1 = *retbuf;
159 uint32 working_size = 0;
160 DATA_BLOB name_index, name;
161
162 memset(temp, 0, sizeof(temp));
163 snprintf(temp, sizeof(temp), "%d", keyval);
164 kbuf = string_tdb_data(temp);
165 dbuf = tdb_fetch_compat(tdb, kbuf);
166 if(dbuf.dptr == NULL)
167 {
168 /* If a key isn't there, just bypass it -- this really shouldn't
169 happen unless someone's mucking around with the tdb */
170 DEBUG(3, ("_reg_perfcount_multi_sz_from_tdb: failed to find key [%s] in [%s].\n",
171 temp, tdb_name(tdb)));
172 return buffer_size;
173 }
174 /* First encode the name_index */
175 working_size = (kbuf.dsize + 1)*sizeof(uint16);
176 buf1 = (char *)SMB_REALLOC(buf1, buffer_size + working_size);
177 if(!buf1) {
178 buffer_size = 0;
179 return buffer_size;
180 }
181 push_reg_sz(talloc_tos(), &name_index, (const char *)kbuf.dptr);
182 memcpy(buf1+buffer_size, (char *)name_index.data, working_size);
183 buffer_size += working_size;
184 /* Now encode the actual name */
185 working_size = (dbuf.dsize + 1)*sizeof(uint16);
186 buf1 = (char *)SMB_REALLOC(buf1, buffer_size + working_size);
187 if(!buf1) {
188 buffer_size = 0;
189 return buffer_size;
190 }
191 memset(temp, 0, sizeof(temp));
192 memcpy(temp, dbuf.dptr, dbuf.dsize);
193 SAFE_FREE(dbuf.dptr);
194 push_reg_sz(talloc_tos(), &name, temp);
195 memcpy(buf1+buffer_size, (char *)name.data, working_size);
196 buffer_size += working_size;
197
198 *retbuf = buf1;
199
200 return buffer_size;
201 }
202
203 /*********************************************************************
204 *********************************************************************/
205
206 uint32 reg_perfcount_get_counter_help(uint32 base_index, char **retbuf)
207 {
208 char *buf1 = NULL;
209 uint32 buffer_size = 0;
210 TDB_CONTEXT *names;
211 const char *fname = counters_directory( NAMES_DB );
212 int i;
213
214 if(base_index == 0)
215 return 0;
216
217 names = tdb_open_log(fname, 0, TDB_DEFAULT, O_RDONLY, 0444);
218
219 if(names == NULL)
220 {
221 DEBUG(1, ("reg_perfcount_get_counter_help: unable to open [%s].\n", fname));
222 return 0;
223 }
224
225 for(i = 1; i <= base_index; i++)
226 {
227 buffer_size = _reg_perfcount_multi_sz_from_tdb(names, (i*2)+1, retbuf, buffer_size);
228 }
229 tdb_close(names);
230
231 /* Now terminate the MULTI_SZ with a double unicode NULL */
232 buf1 = *retbuf;
233 buf1 = (char *)SMB_REALLOC(buf1, buffer_size + 2);
234 if(!buf1) {
235 buffer_size = 0;
236 } else {
237 buf1[buffer_size++] = '\0';
238 buf1[buffer_size++] = '\0';
239 }
240
241 *retbuf = buf1;
242
243 return buffer_size;
244 }
245
246 /*********************************************************************
247 *********************************************************************/
248
249 uint32 reg_perfcount_get_counter_names(uint32 base_index, char **retbuf)
250 {
251 char *buf1 = NULL;
252 uint32 buffer_size = 0;
253 TDB_CONTEXT *names;
254 const char *fname = counters_directory( NAMES_DB );
255 int i;
256
257 if(base_index == 0)
258 return 0;
259
260 names = tdb_open_log(fname, 0, TDB_DEFAULT, O_RDONLY, 0444);
261
262 if(names == NULL)
263 {
264 DEBUG(1, ("reg_perfcount_get_counter_names: unable to open [%s].\n", fname));
265 return 0;
266 }
267
268 buffer_size = _reg_perfcount_multi_sz_from_tdb(names, 1, retbuf, buffer_size);
269
270 for(i = 1; i <= base_index; i++)
271 {
272 buffer_size = _reg_perfcount_multi_sz_from_tdb(names, i*2, retbuf, buffer_size);
273 }
274 tdb_close(names);
275
276 /* Now terminate the MULTI_SZ with a double unicode NULL */
277 buf1 = *retbuf;
278 buf1 = (char *)SMB_REALLOC(buf1, buffer_size + 2);
279 if(!buf1) {
280 buffer_size = 0;
281 } else {
282 buf1[buffer_size++] = '\0';
283 buf1[buffer_size++] = '\0';
284 }
285
286 *retbuf=buf1;
287
288 return buffer_size;
289 }
290
291 /*********************************************************************
292 *********************************************************************/
293
294 static void _reg_perfcount_make_key(TDB_DATA *key,
295 char *buf,
296 int buflen,
297 int key_part1,
298 const char *key_part2)
299 {
300 memset(buf, 0, buflen);
301 if(key_part2 != NULL)
302 snprintf(buf, buflen,"%d%s", key_part1, key_part2);
303 else
304 snprintf(buf, buflen, "%d", key_part1);
305
306 *key = string_tdb_data(buf);
307
308 return;
309 }
310
311 /*********************************************************************
312 *********************************************************************/
313
314 static bool _reg_perfcount_isparent(TDB_DATA data)
315 {
316 if(data.dsize > 0)
317 {
318 if(data.dptr[0] == 'p')
319 return True;
320 else
321 return False;
322 }
323 return False;
324 }
325
326 /*********************************************************************
327 *********************************************************************/
328
329 static bool _reg_perfcount_ischild(TDB_DATA data)
330 {
331 if(data.dsize > 0)
332 {
333 if(data.dptr[0] == 'c')
334 return True;
335 else
336 return False;
337 }
338 return False;
339 }
340
341 /*********************************************************************
342 *********************************************************************/
343
344 static uint32 _reg_perfcount_get_numinst(int objInd, TDB_CONTEXT *names)
345 {
346 TDB_DATA key, data;
347 char buf[PERFCOUNT_MAX_LEN];
348
349 _reg_perfcount_make_key(&key, buf, PERFCOUNT_MAX_LEN, objInd, "inst");
350 data = tdb_fetch_compat(names, key);
351
352 if(data.dptr == NULL)
353 return (uint32)PERF_NO_INSTANCES;
354
355 memset(buf, 0, PERFCOUNT_MAX_LEN);
356 memcpy(buf, data.dptr, data.dsize);
357 SAFE_FREE(data.dptr);
358 return (uint32)atoi(buf);
359 }
360
361 /*********************************************************************
362 *********************************************************************/
363
364 static bool _reg_perfcount_add_instance(struct PERF_OBJECT_TYPE *obj,
365 TALLOC_CTX *mem_ctx,
366 int instInd,
367 TDB_CONTEXT *names);
368
369 static bool _reg_perfcount_add_object(struct PERF_DATA_BLOCK *block,
370 TALLOC_CTX *mem_ctx,
371 int num,
372 TDB_DATA data,
373 TDB_CONTEXT *names)
374 {
375 int i;
376 bool success = True;
377 struct PERF_OBJECT_TYPE *obj;
378
379 block->objects = (struct PERF_OBJECT_TYPE *)talloc_realloc(mem_ctx,
380 block->objects,
381 struct PERF_OBJECT_TYPE,
382 block->NumObjectTypes+1);
383 if(block->objects == NULL)
384 return False;
385 obj = &(block->objects[block->NumObjectTypes]);
386 memset((void *)&(block->objects[block->NumObjectTypes]), 0, sizeof(struct PERF_OBJECT_TYPE));
387 block->objects[block->NumObjectTypes].ObjectNameTitleIndex = num;
388 block->objects[block->NumObjectTypes].ObjectNameTitlePointer = 0;
389 block->objects[block->NumObjectTypes].ObjectHelpTitleIndex = num+1;
390 block->objects[block->NumObjectTypes].ObjectHelpTitlePointer = 0;
391 block->objects[block->NumObjectTypes].NumCounters = 0;
392 block->objects[block->NumObjectTypes].DefaultCounter = 0;
393 block->objects[block->NumObjectTypes].NumInstances = _reg_perfcount_get_numinst(num, names);
394 block->objects[block->NumObjectTypes].counters = NULL;
395 block->objects[block->NumObjectTypes].instances = NULL;
396 block->objects[block->NumObjectTypes].counter_data.ByteLength = sizeof(uint32);
397 block->objects[block->NumObjectTypes].counter_data.data = NULL;
398 block->objects[block->NumObjectTypes].DetailLevel = PERF_DETAIL_NOVICE;
399 block->NumObjectTypes+=1;
400
401 for(i = 0; i < (int)obj->NumInstances; i++) {
402 success = _reg_perfcount_add_instance(obj, mem_ctx, i, names);
403 }
404
405 return success;
406 }
407
408 /*********************************************************************
409 *********************************************************************/
410
411 static bool _reg_perfcount_get_counter_data(TDB_DATA key, TDB_DATA *data)
412 {
413 TDB_CONTEXT *counters;
414 const char *fname = counters_directory( DATA_DB );
415
416 counters = tdb_open_log(fname, 0, TDB_DEFAULT, O_RDONLY, 0444);
417
418 if(counters == NULL)
419 {
420 DEBUG(1, ("reg_perfcount_get_counter_data: unable to open [%s].\n", fname));
421 return False;
422 }
423
424 *data = tdb_fetch_compat(counters, key);
425
426 tdb_close(counters);
427
428 return True;
429 }
430
431 /*********************************************************************
432 *********************************************************************/
433
434 static uint32 _reg_perfcount_get_size_field(uint32 CounterType)
435 {
436 uint32 retval;
437
438 retval = CounterType;
439
440 /* First mask out reserved lower 8 bits */
441 retval = retval & 0xFFFFFF00;
442 retval = retval << 22;
443 retval = retval >> 22;
444
445 return retval;
446 }
447
448 /*********************************************************************
449 *********************************************************************/
450
451 static uint32 _reg_perfcount_compute_scale(int64_t data)
452 {
453 int scale = 0;
454 if(data == 0)
455 return scale;
456 while(data > 100)
457 {
458 data /= 10;
459 scale--;
460 }
461 while(data < 10)
462 {
463 data *= 10;
464 scale++;
465 }
466
467 return (uint32)scale;
468 }
469
470 /*********************************************************************
471 *********************************************************************/
472
473 static bool _reg_perfcount_get_counter_info(struct PERF_DATA_BLOCK *block,
474 TALLOC_CTX *mem_ctx,
475 int CounterIndex,
476 struct PERF_OBJECT_TYPE *obj,
477 TDB_CONTEXT *names)
478 {
479 TDB_DATA key, data;
480 char buf[PERFCOUNT_MAX_LEN];
481 size_t dsize, padding;
482 long int data32, dbuf[2];
483 int64_t data64;
484 uint32 counter_size;
485
486 obj->counters[obj->NumCounters].DefaultScale = 0;
487 dbuf[0] = dbuf[1] = 0;
488 padding = 0;
489
490 _reg_perfcount_make_key(&key, buf, PERFCOUNT_MAX_LEN, CounterIndex, "type");
491 data = tdb_fetch_compat(names, key);
492 if(data.dptr == NULL)
493 {
494 DEBUG(3, ("_reg_perfcount_get_counter_info: No type data for counter [%d].\n", CounterIndex));
495 return False;
496 }
497 memset(buf, 0, PERFCOUNT_MAX_LEN);
498 memcpy(buf, data.dptr, data.dsize);
499 obj->counters[obj->NumCounters].CounterType = atoi(buf);
500 DEBUG(10, ("_reg_perfcount_get_counter_info: Got type [%d] for counter [%d].\n",
501 obj->counters[obj->NumCounters].CounterType, CounterIndex));
502 SAFE_FREE(data.dptr);
503
504 /* Fetch the actual data */
505 _reg_perfcount_make_key(&key, buf, PERFCOUNT_MAX_LEN, CounterIndex, "");
506 _reg_perfcount_get_counter_data(key, &data);
507 if(data.dptr == NULL)
508 {
509 DEBUG(3, ("_reg_perfcount_get_counter_info: No counter data for counter [%d].\n", CounterIndex));
510 return False;
511 }
512
513 counter_size = _reg_perfcount_get_size_field(obj->counters[obj->NumCounters].CounterType);
514
515 if(counter_size == PERF_SIZE_DWORD)
516 {
517 dsize = sizeof(data32);
518 memset(buf, 0, PERFCOUNT_MAX_LEN);
519 memcpy(buf, data.dptr, data.dsize);
520 data32 = strtol(buf, NULL, 0);
521 if((obj->counters[obj->NumCounters].CounterType & 0x00000F00) == PERF_TYPE_NUMBER)
522 obj->counters[obj->NumCounters].DefaultScale = _reg_perfcount_compute_scale((int64_t)data32);
523 else
524 obj->counters[obj->NumCounters].DefaultScale = 0;
525 dbuf[0] = data32;
526 padding = (dsize - (obj->counter_data.ByteLength%dsize)) % dsize;
527 }
528 else if(counter_size == PERF_SIZE_LARGE)
529 {
530 dsize = sizeof(data64);
531 memset(buf, 0, PERFCOUNT_MAX_LEN);
532 memcpy(buf, data.dptr, data.dsize);
533 data64 = atof(buf);
534 if((obj->counters[obj->NumCounters].CounterType & 0x00000F00) == PERF_TYPE_NUMBER)
535 obj->counters[obj->NumCounters].DefaultScale = _reg_perfcount_compute_scale(data64);
536 else
537 obj->counters[obj->NumCounters].DefaultScale = 0;
538 memcpy((void *)dbuf, (const void *)&data64, dsize);
539 padding = (dsize - (obj->counter_data.ByteLength%dsize)) % dsize;
540 }
541 else /* PERF_SIZE_VARIABLE_LEN */
542 {
543 dsize = data.dsize;
544 memset(buf, 0, PERFCOUNT_MAX_LEN);
545 memcpy(buf, data.dptr, data.dsize);
546 }
547 SAFE_FREE(data.dptr);
548
549 obj->counter_data.ByteLength += dsize + padding;
550 obj->counter_data.data = talloc_realloc(mem_ctx,
551 obj->counter_data.data,
552 uint8,
553 obj->counter_data.ByteLength - sizeof(uint32));
554 if(obj->counter_data.data == NULL)
555 return False;
556 if(dbuf[0] != 0 || dbuf[1] != 0)
557 {
558 memcpy((void *)(obj->counter_data.data +
559 (obj->counter_data.ByteLength - (sizeof(uint32) + dsize))),
560 (const void *)dbuf, dsize);
561 }
562 else
563 {
564 /* Handling PERF_SIZE_VARIABLE_LEN */
565 memcpy((void *)(obj->counter_data.data +
566 (obj->counter_data.ByteLength - (sizeof(uint32) + dsize))),
567 (const void *)buf, dsize);
568 }
569 obj->counters[obj->NumCounters].CounterOffset = obj->counter_data.ByteLength - dsize;
570 if(obj->counters[obj->NumCounters].CounterOffset % dsize != 0)
571 {
572 DEBUG(3,("Improperly aligned counter [%d]\n", obj->NumCounters));
573 }
574 obj->counters[obj->NumCounters].CounterSize = dsize;
575
576 return True;
577 }
578
579 /*********************************************************************
580 *********************************************************************/
581
582 struct PERF_OBJECT_TYPE *_reg_perfcount_find_obj(struct PERF_DATA_BLOCK *block, int objind)
583 {
584 int i;
585
586 struct PERF_OBJECT_TYPE *obj = NULL;
587
588 for(i = 0; i < block->NumObjectTypes; i++)
589 {
590 if(block->objects[i].ObjectNameTitleIndex == objind)
591 {
592 obj = &(block->objects[i]);
593 }
594 }
595
596 return obj;
597 }
598
599 /*********************************************************************
600 *********************************************************************/
601
602 static bool _reg_perfcount_add_counter(struct PERF_DATA_BLOCK *block,
603 TALLOC_CTX *mem_ctx,
604 int num,
605 TDB_DATA data,
606 TDB_CONTEXT *names)
607 {
608 char *begin, *end, *start, *stop;
609 int parent;
610 struct PERF_OBJECT_TYPE *obj;
611 bool success = True;
612 char buf[PERFCOUNT_MAX_LEN];
613
614 obj = NULL;
615 memset(buf, 0, PERFCOUNT_MAX_LEN);
616 memcpy(buf, data.dptr, data.dsize);
617 begin = strchr(buf, '[');
618 end = strchr(buf, ']');
619 if(begin == NULL || end == NULL)
620 return False;
621 start = begin+1;
622
623 while(start < end) {
624 stop = strchr(start, ',');
625 if(stop == NULL)
626 stop = end;
627 *stop = '\0';
628 parent = atoi(start);
629
630 obj = _reg_perfcount_find_obj(block, parent);
631 if(obj == NULL) {
632 /* At this point we require that the parent object exist.
633 This can probably be handled better at some later time */
634 DEBUG(3, ("_reg_perfcount_add_counter: Could not find parent object [%d] for counter [%d].\n",
635 parent, num));
636 return False;
637 }
638 obj->counters = (struct PERF_COUNTER_DEFINITION *)talloc_realloc(mem_ctx,
639 obj->counters,
640 struct PERF_COUNTER_DEFINITION,
641 obj->NumCounters+1);
642 if(obj->counters == NULL)
643 return False;
644 memset((void *)&(obj->counters[obj->NumCounters]), 0, sizeof(struct PERF_COUNTER_DEFINITION));
645 obj->counters[obj->NumCounters].CounterNameTitleIndex=num;
646 obj->counters[obj->NumCounters].CounterHelpTitleIndex=num+1;
647 obj->counters[obj->NumCounters].DetailLevel = PERF_DETAIL_NOVICE;
648 obj->counters[obj->NumCounters].ByteLength = sizeof(struct PERF_COUNTER_DEFINITION);
649 success = _reg_perfcount_get_counter_info(block, mem_ctx, num, obj, names);
650 obj->NumCounters += 1;
651 start = stop + 1;
652 }
653
654 /* Handle case of Objects/Counters without any counter data, which would suggest
655 that the required instances are not there yet, so change NumInstances from
656 PERF_NO_INSTANCES to 0 */
657
658 return success;
659 }
660
661 /*********************************************************************
662 *********************************************************************/
663
664 static bool _reg_perfcount_get_instance_info(struct PERF_INSTANCE_DEFINITION *inst,
665 TALLOC_CTX *mem_ctx,
666 int instId,
667 struct PERF_OBJECT_TYPE *obj,
668 TDB_CONTEXT *names)
669 {
670 TDB_DATA key, data;
671 char buf[PERFCOUNT_MAX_LEN], temp[PERFCOUNT_MAX_LEN];
672 smb_ucs2_t *name = NULL;
673 int pad;
674
675 /* First grab the instance data from the data file */
676 memset(temp, 0, PERFCOUNT_MAX_LEN);
677 snprintf(temp, PERFCOUNT_MAX_LEN, "i%d", instId);
678 _reg_perfcount_make_key(&key, buf, PERFCOUNT_MAX_LEN, obj->ObjectNameTitleIndex, temp);
679 if (!_reg_perfcount_get_counter_data(key, &data)) {
680 DEBUG(3, ("_reg_perfcount_get_counter_data failed\n"));
681 return false;
682 }
683 if(data.dptr == NULL)
684 {
685 DEBUG(3, ("_reg_perfcount_get_instance_info: No instance data for instance [%s].\n",
686 buf));
687 return False;
688 }
689 inst->counter_data.ByteLength = data.dsize + sizeof(inst->counter_data.ByteLength);
690 inst->counter_data.data = talloc_realloc(mem_ctx,
691 inst->counter_data.data,
692 uint8,
693 data.dsize);
694 if(inst->counter_data.data == NULL)
695 return False;
696 memset(inst->counter_data.data, 0, data.dsize);
697 memcpy(inst->counter_data.data, data.dptr, data.dsize);
698 SAFE_FREE(data.dptr);
699
700 /* Fetch instance name */
701 memset(temp, 0, PERFCOUNT_MAX_LEN);
702 snprintf(temp, PERFCOUNT_MAX_LEN, "i%dname", instId);
703 _reg_perfcount_make_key(&key, buf, PERFCOUNT_MAX_LEN, obj->ObjectNameTitleIndex, temp);
704 data = tdb_fetch_compat(names, key);
705 if(data.dptr == NULL)
706 {
707 /* Not actually an error, but possibly unintended? -- just logging FYI */
708 DEBUG(3, ("_reg_perfcount_get_instance_info: No instance name for instance [%s].\n",
709 buf));
710 inst->NameLength = 0;
711 }
712 else
713 {
714 memset(buf, 0, PERFCOUNT_MAX_LEN);
715 memcpy(buf, data.dptr, MIN(PERFCOUNT_MAX_LEN-1,data.dsize));
716 buf[PERFCOUNT_MAX_LEN-1] = '\0';
717 inst->NameLength = rpcstr_push_talloc(mem_ctx, &name, buf);
718 if (inst->NameLength == (uint32_t)-1 || !name) {
719 SAFE_FREE(data.dptr);
720 return False;
721 }
722 inst->data = talloc_realloc(mem_ctx,
723 inst->data,
724 uint8,
725 inst->NameLength);
726 if (inst->data == NULL) {
727 SAFE_FREE(data.dptr);
728 return False;
729 }
730 memcpy(inst->data, name, inst->NameLength);
731 SAFE_FREE(data.dptr);
732 }
733
734 inst->ParentObjectTitleIndex = 0;
735 inst->ParentObjectTitlePointer = 0;
736 inst->UniqueID = PERF_NO_UNIQUE_ID;
737 inst->NameOffset = 6 * sizeof(uint32);
738
739 inst->ByteLength = inst->NameOffset + inst->NameLength;
740 /* Need to be aligned on a 64-bit boundary here for counter_data */
741 if((pad = (inst->ByteLength % 8)))
742 {
743 pad = 8 - pad;
744 inst->data = talloc_realloc(mem_ctx,
745 inst->data,
746 uint8,
747 inst->NameLength + pad);
748 memset(inst->data + inst->NameLength, 0, pad);
749 inst->ByteLength += pad;
750 }
751
752 return True;
753 }
754
755 /*********************************************************************
756 *********************************************************************/
757
758 static bool _reg_perfcount_add_instance(struct PERF_OBJECT_TYPE *obj,
759 TALLOC_CTX *mem_ctx,
760 int instInd,
761 TDB_CONTEXT *names)
762 {
763 struct PERF_INSTANCE_DEFINITION *inst;
764
765 if(obj->instances == NULL) {
766 obj->instances = talloc_realloc(mem_ctx,
767 obj->instances,
768 struct PERF_INSTANCE_DEFINITION,
769 obj->NumInstances);
770 }
771 if(obj->instances == NULL)
772 return False;
773
774 memset(&(obj->instances[instInd]), 0, sizeof(struct PERF_INSTANCE_DEFINITION));
775 inst = &(obj->instances[instInd]);
776 return _reg_perfcount_get_instance_info(inst, mem_ctx, instInd, obj, names);
777 }
778
779 /*********************************************************************
780 *********************************************************************/
781
782 static int _reg_perfcount_assemble_global(struct PERF_DATA_BLOCK *block,
783 TALLOC_CTX *mem_ctx,
784 int base_index,
785 TDB_CONTEXT *names)
786 {
787 bool success;
788 int i, j, retval = 0;
789 char keybuf[PERFCOUNT_MAX_LEN];
790 TDB_DATA key, data;
791
792 for(i = 1; i <= base_index; i++)
793 {
794 j = i*2;
795 _reg_perfcount_make_key(&key, keybuf, PERFCOUNT_MAX_LEN, j, "rel");
796 data = tdb_fetch_compat(names, key);
797 if(data.dptr != NULL)
798 {
799 if(_reg_perfcount_isparent(data))
800 success = _reg_perfcount_add_object(block, mem_ctx, j, data, names);
801 else if(_reg_perfcount_ischild(data))
802 success = _reg_perfcount_add_counter(block, mem_ctx, j, data, names);
803 else
804 {
805 DEBUG(3, ("Bogus relationship [%s] for counter [%d].\n", data.dptr, j));
806 success = False;
807 }
808 if(success == False)
809 {
810 DEBUG(3, ("_reg_perfcount_assemble_global: Failed to add new relationship for counter [%d].\n", j));
811 retval = -1;
812 }
813 SAFE_FREE(data.dptr);
814 }
815 else
816 DEBUG(3, ("NULL relationship for counter [%d] using key [%s].\n", j, keybuf));
817 }
818 return retval;
819 }
820
821 /*********************************************************************
822 *********************************************************************/
823
824 static bool _reg_perfcount_get_64(uint64_t *retval,
825 TDB_CONTEXT *tdb,
826 int key_part1,
827 const char *key_part2)
828 {
829 TDB_DATA key, data;
830 char buf[PERFCOUNT_MAX_LEN];
831
832 _reg_perfcount_make_key(&key, buf, PERFCOUNT_MAX_LEN, key_part1, key_part2);
833
834 data = tdb_fetch_compat(tdb, key);
835 if(data.dptr == NULL)
836 {
837 DEBUG(3,("_reg_perfcount_get_64: No data found for key [%s].\n", key.dptr));
838 return False;
839 }
840
841 memset(buf, 0, PERFCOUNT_MAX_LEN);
842 memcpy(buf, data.dptr, data.dsize);
843 SAFE_FREE(data.dptr);
844
845 *retval = atof(buf);
846
847 return True;
848 }
849
850 /*********************************************************************
851 *********************************************************************/
852
853 static bool _reg_perfcount_init_data_block_perf(struct PERF_DATA_BLOCK *block,
854 TDB_CONTEXT *names)
855 {
856 uint64_t PerfFreq, PerfTime, PerfTime100nSec;
857 TDB_CONTEXT *counters;
858 bool status = False;
859 const char *fname = counters_directory( DATA_DB );
860
861 counters = tdb_open_log(fname, 0, TDB_DEFAULT, O_RDONLY, 0444);
862
863 if(counters == NULL)
864 {
865 DEBUG(1, ("reg_perfcount_init_data_block_perf: unable to open [%s].\n", fname));
866 return False;
867 }
868
869 status = _reg_perfcount_get_64(&PerfFreq, names, 0, "PerfFreq");
870 if(status == False)
871 {
872 tdb_close(counters);
873 return status;
874 }
875 memcpy((void *)&(block->PerfFreq), (const void *)&PerfFreq, sizeof(PerfFreq));
876
877 status = _reg_perfcount_get_64(&PerfTime, counters, 0, "PerfTime");
878 if(status == False)
879 {
880 tdb_close(counters);
881 return status;
882 }
883 memcpy((void *)&(block->PerfTime), (const void *)&PerfTime, sizeof(PerfTime));
884
885 status = _reg_perfcount_get_64(&PerfTime100nSec, counters, 0, "PerfTime100nSec");
886 if(status == False)
887 {
888 tdb_close(counters);
889 return status;
890 }
891 memcpy((void *)&(block->PerfTime100nSec), (const void *)&PerfTime100nSec, sizeof(PerfTime100nSec));
892
893 tdb_close(counters);
894 return True;
895 }
896
897 /*******************************************************************
898 ********************************************************************/
899
900 static bool make_systemtime(struct SYSTEMTIME *systime, struct tm *unixtime)
901 {
902 systime->year=unixtime->tm_year+1900;
903 systime->month=unixtime->tm_mon+1;
904 systime->dayofweek=unixtime->tm_wday;
905 systime->day=unixtime->tm_mday;
906 systime->hour=unixtime->tm_hour;
907 systime->minute=unixtime->tm_min;
908 systime->second=unixtime->tm_sec;
909 systime->milliseconds=0;
910
911 return True;
912 }
913
914 /*********************************************************************
915 *********************************************************************/
916
917 static bool _reg_perfcount_init_data_block(struct PERF_DATA_BLOCK *block,
918 TALLOC_CTX *mem_ctx, TDB_CONTEXT *names,
919 bool bigendian_data)
920 {
921 smb_ucs2_t *temp = NULL;
922 time_t tm;
923
924 if (rpcstr_push_talloc(mem_ctx, &temp, "PERF")==(size_t)-1) {
925 return false;
926 }
927 if (!temp) {
928 return false;
929 }
930 memcpy(block->Signature, temp, strlen_w(temp) *2);
931
932 if(bigendian_data)
933 block->LittleEndian = 0;
934 else
935 block->LittleEndian = 1;
936 block->Version = 1;
937 block->Revision = 1;
938 block->TotalByteLength = 0;
939 block->NumObjectTypes = 0;
940 block->DefaultObject = -1;
941 block->objects = NULL;
942 tm = time(NULL);
943 make_systemtime(&(block->SystemTime), gmtime(&tm));
944 _reg_perfcount_init_data_block_perf(block, names);
945 memset(temp, 0, sizeof(temp));
946 rpcstr_push((void *)temp, lp_netbios_name(), sizeof(temp), STR_TERMINATE);
947 block->SystemNameLength = (strlen_w(temp) * 2) + 2;
948 block->data = talloc_zero_array(mem_ctx, uint8, block->SystemNameLength + (8 - (block->SystemNameLength % 8)));
949 if (block->data == NULL) {
950 return False;
951 }
952 memcpy(block->data, temp, block->SystemNameLength);
953 block->SystemNameOffset = sizeof(struct PERF_DATA_BLOCK) - sizeof(block->objects) - sizeof(block->data);
954 block->HeaderLength = block->SystemNameOffset + block->SystemNameLength;
955 /* Make sure to adjust for 64-bit alignment for when we finish writing the system name,
956 so that the PERF_OBJECT_TYPE struct comes out 64-bit aligned */
957 block->HeaderLength += 8 - (block->HeaderLength % 8);
958
959 return True;
960 }
961
962 /*********************************************************************
963 *********************************************************************/
964
965 static uint32 _reg_perfcount_perf_data_block_fixup(struct PERF_DATA_BLOCK *block, TALLOC_CTX *mem_ctx)
966 {
967 int obj, cnt, inst, pad, i;
968 struct PERF_OBJECT_TYPE *object;
969 struct PERF_INSTANCE_DEFINITION *instance;
970 struct PERF_COUNTER_DEFINITION *counter;
971 struct PERF_COUNTER_BLOCK *counter_data;
972 char *temp = NULL, *src_addr, *dst_addr;
973
974 block->TotalByteLength = 0;
975 object = block->objects;
976 for(obj = 0; obj < block->NumObjectTypes; obj++)
977 {
978 object[obj].TotalByteLength = 0;
979 object[obj].DefinitionLength = 0;
980 instance = object[obj].instances;
981 counter = object[obj].counters;
982 for(cnt = 0; cnt < object[obj].NumCounters; cnt++)
983 {
984 object[obj].TotalByteLength += counter[cnt].ByteLength;
985 object[obj].DefinitionLength += counter[cnt].ByteLength;
986 }
987 if(object[obj].NumInstances != PERF_NO_INSTANCES)
988 {
989 for(inst = 0; inst < object[obj].NumInstances; inst++)
990 {
991 instance = &(object[obj].instances[inst]);
992 object[obj].TotalByteLength += instance->ByteLength;
993 counter_data = &(instance->counter_data);
994 counter = &(object[obj].counters[object[obj].NumCounters - 1]);
995 counter_data->ByteLength = counter->CounterOffset + counter->CounterSize + sizeof(counter_data->ByteLength);
996 temp = talloc_realloc(mem_ctx,
997 temp,
998 char,
999 counter_data->ByteLength- sizeof(counter_data->ByteLength));
1000 if (temp == NULL) {
1001 return 0;
1002 }
1003 memset(temp, 0, counter_data->ByteLength - sizeof(counter_data->ByteLength));
1004 src_addr = (char *)counter_data->data;
1005 for(i = 0; i < object[obj].NumCounters; i++)
1006 {
1007 counter = &(object[obj].counters[i]);
1008 dst_addr = temp + counter->CounterOffset - sizeof(counter_data->ByteLength);
1009 memcpy(dst_addr, src_addr, counter->CounterSize);
1010 src_addr += counter->CounterSize;
1011 }
1012 /* Make sure to be 64-bit aligned */
1013 if((pad = (counter_data->ByteLength % 8)))
1014 {
1015 pad = 8 - pad;
1016 }
1017 counter_data->data = talloc_realloc(mem_ctx,
1018 counter_data->data,
1019 uint8,
1020 counter_data->ByteLength - sizeof(counter_data->ByteLength) + pad);
1021 if (counter_data->data == NULL) {
1022 return 0;
1023 }
1024 memset(counter_data->data, 0, counter_data->ByteLength - sizeof(counter_data->ByteLength) + pad);
1025 memcpy(counter_data->data, temp, counter_data->ByteLength - sizeof(counter_data->ByteLength));
1026 counter_data->ByteLength += pad;
1027 object[obj].TotalByteLength += counter_data->ByteLength;
1028 }
1029 }
1030 else
1031 {
1032 /* Need to be 64-bit aligned at the end of the counter_data block, so pad counter_data to a 64-bit boundary,
1033 so that the next PERF_OBJECT_TYPE can start on a 64-bit alignment */
1034 if((pad = (object[obj].counter_data.ByteLength % 8)))
1035 {
1036 pad = 8 - pad;
1037 object[obj].counter_data.data = talloc_realloc(mem_ctx,
1038 object[obj].counter_data.data,
1039 uint8,
1040 object[obj].counter_data.ByteLength + pad);
1041 memset((void *)(object[obj].counter_data.data + object[obj].counter_data.ByteLength), 0, pad);
1042 object[obj].counter_data.ByteLength += pad;
1043 }
1044 object[obj].TotalByteLength += object[obj].counter_data.ByteLength;
1045 }
1046 object[obj].HeaderLength = sizeof(*object) - (sizeof(counter) + sizeof(instance) + sizeof(struct PERF_COUNTER_BLOCK));
1047 object[obj].TotalByteLength += object[obj].HeaderLength;
1048 object[obj].DefinitionLength += object[obj].HeaderLength;
1049
1050 block->TotalByteLength += object[obj].TotalByteLength;
1051 }
1052
1053 return block->TotalByteLength;
1054 }
1055
1056 /*********************************************************************
1057 *********************************************************************/
1058
1059 static uint32 reg_perfcount_get_perf_data_block(uint32 base_index,
1060 TALLOC_CTX *mem_ctx,
1061 struct PERF_DATA_BLOCK *block,
1062 const char *object_ids,
1063 bool bigendian_data)
1064 {
1065 uint32 buffer_size = 0;
1066 const char *fname = counters_directory( NAMES_DB );
1067 TDB_CONTEXT *names;
1068 int retval = 0;
1069
1070 names = tdb_open_log(fname, 0, TDB_DEFAULT, O_RDONLY, 0444);
1071
1072 if(names == NULL)
1073 {
1074 DEBUG(1, ("reg_perfcount_get_perf_data_block: unable to open [%s].\n", fname));
1075 return 0;
1076 }
1077
1078 if (!_reg_perfcount_init_data_block(block, mem_ctx, names, bigendian_data)) {
1079 DEBUG(0, ("_reg_perfcount_init_data_block failed\n"));
1080 tdb_close(names);
1081 return 0;
1082 }
1083
1084 reg_perfcount_get_last_counter(base_index);
1085
1086 if(object_ids == NULL)
1087 {
1088 /* we're getting a request for "Global" here */
1089 retval = _reg_perfcount_assemble_global(block, mem_ctx, base_index, names);
1090 }
1091 else
1092 {
1093 /* we're getting a request for a specific set of PERF_OBJECT_TYPES */
1094 retval = _reg_perfcount_assemble_global(block, mem_ctx, base_index, names);
1095 }
1096 buffer_size = _reg_perfcount_perf_data_block_fixup(block, mem_ctx);
1097
1098 tdb_close(names);
1099
1100 if (retval == -1) {
1101 return 0;
1102 }
1103
1104 return buffer_size + block->HeaderLength;
1105 }
1106
1107 /*******************************************************************
1108 ********************************************************************/
1109
1110 static bool smb_io_system_time(const char *desc, prs_struct *ps, int depth, struct SYSTEMTIME *systime)
1111 {
1112 if(!prs_uint16("year", ps, depth, &systime->year))
1113 return False;
1114 if(!prs_uint16("month", ps, depth, &systime->month))
1115 return False;
1116 if(!prs_uint16("dayofweek", ps, depth, &systime->dayofweek))
1117 return False;
1118 if(!prs_uint16("day", ps, depth, &systime->day))
1119 return False;
1120 if(!prs_uint16("hour", ps, depth, &systime->hour))
1121 return False;
1122 if(!prs_uint16("minute", ps, depth, &systime->minute))
1123 return False;
1124 if(!prs_uint16("second", ps, depth, &systime->second))
1125 return False;
1126 if(!prs_uint16("milliseconds", ps, depth, &systime->milliseconds))
1127 return False;
1128
1129 return True;
1130 }
1131
1132 /*********************************************************************
1133 *********************************************************************/
1134
1135 static bool _reg_perfcount_marshall_perf_data_block(prs_struct *ps, struct PERF_DATA_BLOCK block, int depth)
1136 {
1137 int i;
1138 prs_debug(ps, depth, "", "_reg_perfcount_marshall_perf_data_block");
1139 depth++;
1140
1141 if(!prs_align(ps))
1142 return False;
1143 for(i = 0; i < 4; i++)
1144 {
1145 if(!prs_uint16("Signature", ps, depth, &block.Signature[i]))
1146 return False;
1147 }
1148 if(!prs_uint32("Little Endian", ps, depth, &block.LittleEndian))
1149 return False;
1150 if(!prs_uint32("Version", ps, depth, &block.Version))
1151 return False;
1152 if(!prs_uint32("Revision", ps, depth, &block.Revision))
1153 return False;
1154 if(!prs_uint32("TotalByteLength", ps, depth, &block.TotalByteLength))
1155 return False;
1156 if(!prs_uint32("HeaderLength", ps, depth, &block.HeaderLength))
1157 return False;
1158 if(!prs_uint32("NumObjectTypes", ps, depth, &block.NumObjectTypes))
1159 return False;
1160 if(!prs_uint32("DefaultObject", ps, depth, &block.DefaultObject))
1161 return False;
1162 if(!smb_io_system_time("SystemTime", ps, depth, &block.SystemTime))
1163 return False;
1164 if(!prs_uint32("Padding", ps, depth, &block.Padding))
1165 return False;
1166 if(!prs_align_uint64(ps))
1167 return False;
1168 if(!prs_uint64("PerfTime", ps, depth, &block.PerfTime))
1169 return False;
1170 if(!prs_uint64("PerfFreq", ps, depth, &block.PerfFreq))
1171 return False;
1172 if(!prs_uint64("PerfTime100nSec", ps, depth, &block.PerfTime100nSec))
1173 return False;
1174 if(!prs_uint32("SystemNameLength", ps, depth, &block.SystemNameLength))
1175 return False;
1176 if(!prs_uint32("SystemNameOffset", ps, depth, &block.SystemNameOffset))
1177 return False;
1178 /* hack to make sure we're 64-bit aligned at the end of this whole mess */
1179 if(!prs_uint8s(False, "SystemName", ps, depth, block.data,
1180 block.HeaderLength - block.SystemNameOffset))
1181 return False;
1182
1183 return True;
1184 }
1185
1186 /*********************************************************************
1187 *********************************************************************/
1188
1189 static bool _reg_perfcount_marshall_perf_counters(prs_struct *ps,
1190 struct PERF_OBJECT_TYPE object,
1191 int depth)
1192 {
1193 int cnt;
1194 struct PERF_COUNTER_DEFINITION counter;
1195
1196 prs_debug(ps, depth, "", "_reg_perfcount_marshall_perf_counters");
1197 depth++;
1198
1199 for(cnt = 0; cnt < object.NumCounters; cnt++)
1200 {
1201 counter = object.counters[cnt];
1202
1203 if(!prs_align(ps))
1204 return False;
1205 if(!prs_uint32("ByteLength", ps, depth, &counter.ByteLength))
1206 return False;
1207 if(!prs_uint32("CounterNameTitleIndex", ps, depth, &counter.CounterNameTitleIndex))
1208 return False;
1209 if(!prs_uint32("CounterNameTitlePointer", ps, depth, &counter.CounterNameTitlePointer))
1210 return False;
1211 if(!prs_uint32("CounterHelpTitleIndex", ps, depth, &counter.CounterHelpTitleIndex))
1212 return False;
1213 if(!prs_uint32("CounterHelpTitlePointer", ps, depth, &counter.CounterHelpTitlePointer))
1214 return False;
1215 if(!prs_uint32("DefaultScale", ps, depth, &counter.DefaultScale))
1216 return False;
1217 if(!prs_uint32("DetailLevel", ps, depth, &counter.DetailLevel))
1218 return False;
1219 if(!prs_uint32("CounterType", ps, depth, &counter.CounterType))
1220 return False;
1221 if(!prs_uint32("CounterSize", ps, depth, &counter.CounterSize))
1222 return False;
1223 if(!prs_uint32("CounterOffset", ps, depth, &counter.CounterOffset))
1224 return False;
1225 }
1226
1227 return True;
1228 }
1229
1230 /*********************************************************************
1231 *********************************************************************/
1232
1233 static bool _reg_perfcount_marshall_perf_counter_data(prs_struct *ps,
1234 struct PERF_COUNTER_BLOCK counter_data,
1235 int depth)
1236 {
1237 prs_debug(ps, depth, "", "_reg_perfcount_marshall_perf_counter_data");
1238 depth++;
1239
1240 if(!prs_align_uint64(ps))
1241 return False;
1242
1243 if(!prs_uint32("ByteLength", ps, depth, &counter_data.ByteLength))
1244 return False;
1245 if(!prs_uint8s(False, "CounterData", ps, depth, counter_data.data, counter_data.ByteLength - sizeof(uint32)))
1246 return False;
1247 if(!prs_align_uint64(ps))
1248 return False;
1249
1250 return True;
1251 }
1252
1253 /*********************************************************************
1254 *********************************************************************/
1255
1256 static bool _reg_perfcount_marshall_perf_instances(prs_struct *ps,
1257 struct PERF_OBJECT_TYPE object,
1258 int depth)
1259 {
1260 struct PERF_INSTANCE_DEFINITION instance;
1261 int inst;
1262
1263 prs_debug(ps, depth, "", "_reg_perfcount_marshall_perf_instances");
1264 depth++;
1265
1266 for(inst = 0; inst < object.NumInstances; inst++)
1267 {
1268 instance = object.instances[inst];
1269
1270 if(!prs_align(ps))
1271 return False;
1272 if(!prs_uint32("ByteLength", ps, depth, &instance.ByteLength))
1273 return False;
1274 if(!prs_uint32("ParentObjectTitleIndex", ps, depth, &instance.ParentObjectTitleIndex))
1275 return False;
1276 if(!prs_uint32("ParentObjectTitlePointer", ps, depth, &instance.ParentObjectTitlePointer))
1277 return False;
1278 if(!prs_uint32("UniqueID", ps, depth, &instance.UniqueID))
1279 return False;
1280 if(!prs_uint32("NameOffset", ps, depth, &instance.NameOffset))
1281 return False;
1282 if(!prs_uint32("NameLength", ps, depth, &instance.NameLength))
1283 return False;
1284 if(!prs_uint8s(False, "InstanceName", ps, depth, instance.data,
1285 instance.ByteLength - instance.NameOffset))
1286 return False;
1287 if(_reg_perfcount_marshall_perf_counter_data(ps, instance.counter_data, depth) == False)
1288 return False;
1289 }
1290
1291 return True;
1292 }
1293
1294 /*********************************************************************
1295 *********************************************************************/
1296
1297 static bool _reg_perfcount_marshall_perf_objects(prs_struct *ps, struct PERF_DATA_BLOCK block, int depth)
1298 {
1299 int obj;
1300
1301 struct PERF_OBJECT_TYPE object;
1302
1303 prs_debug(ps, depth, "", "_reg_perfcount_marshall_perf_objects");
1304 depth++;
1305
1306 for(obj = 0; obj < block.NumObjectTypes; obj++)
1307 {
1308 object = block.objects[obj];
1309
1310 if(!prs_align(ps))
1311 return False;
1312
1313 if(!prs_uint32("TotalByteLength", ps, depth, &object.TotalByteLength))
1314 return False;
1315 if(!prs_uint32("DefinitionLength", ps, depth, &object.DefinitionLength))
1316 return False;
1317 if(!prs_uint32("HeaderLength", ps, depth, &object.HeaderLength))
1318 return False;
1319 if(!prs_uint32("ObjectNameTitleIndex", ps, depth, &object.ObjectNameTitleIndex))
1320 return False;
1321 if(!prs_uint32("ObjectNameTitlePointer", ps, depth, &object.ObjectNameTitlePointer))
1322 return False;
1323 if(!prs_uint32("ObjectHelpTitleIndex", ps, depth, &object.ObjectHelpTitleIndex))
1324 return False;
1325 if(!prs_uint32("ObjectHelpTitlePointer", ps, depth, &object.ObjectHelpTitlePointer))
1326 return False;
1327 if(!prs_uint32("DetailLevel", ps, depth, &object.DetailLevel))
1328 return False;
1329 if(!prs_uint32("NumCounters", ps, depth, &object.NumCounters))
1330 return False;
1331 if(!prs_uint32("DefaultCounter", ps, depth, &object.DefaultCounter))
1332 return False;
1333 if(!prs_uint32("NumInstances", ps, depth, &object.NumInstances))
1334 return False;
1335 if(!prs_uint32("CodePage", ps, depth, &object.CodePage))
1336 return False;
1337 if(!prs_align_uint64(ps))
1338 return False;
1339 if(!prs_uint64("PerfTime", ps, depth, &object.PerfTime))
1340 return False;
1341 if(!prs_uint64("PerfFreq", ps, depth, &object.PerfFreq))
1342 return False;
1343
1344 /* Now do the counters */
1345 /* If no instances, encode counter_data */
1346 /* If instances, encode instace plus counter data for each instance */
1347 if(_reg_perfcount_marshall_perf_counters(ps, object, depth) == False)
1348 return False;
1349 if(object.NumInstances == PERF_NO_INSTANCES)
1350 {
1351 if(_reg_perfcount_marshall_perf_counter_data(ps, object.counter_data, depth) == False)
1352 return False;
1353 }
1354 else
1355 {
1356 if(_reg_perfcount_marshall_perf_instances(ps, object, depth) == False)
1357 return False;
1358 }
1359 }
1360
1361 return True;
1362 }
1363
1364 /*********************************************************************
1365 *********************************************************************/
1366
1367 WERROR reg_perfcount_get_hkpd(prs_struct *ps, uint32 max_buf_size, uint32 *outbuf_len, const char *object_ids)
1368 {
1369 /*
1370 * For a detailed description of the layout of this structure,
1371 * see http://msdn.microsoft.com/library/default.asp?url=/library/en-us/perfmon/base/performance_data_format.asp
1372 *
1373 * By 2006-11-23 this link did not work anymore, I found something
1374 * promising under
1375 * http://msdn2.microsoft.com/en-us/library/aa373105.aspx -- vl
1376 */
1377 struct PERF_DATA_BLOCK block;
1378 uint32 buffer_size, base_index;
1379
1380 buffer_size = 0;
1381 base_index = reg_perfcount_get_base_index();
1382 ZERO_STRUCT(block);
1383
1384 buffer_size = reg_perfcount_get_perf_data_block(base_index, ps->mem_ctx, &block, object_ids, ps->bigendian_data);
1385
1386 if(buffer_size < max_buf_size)
1387 {
1388 *outbuf_len = buffer_size;
1389
1390 if (!_reg_perfcount_marshall_perf_data_block(ps, block, 0))
1391 return WERR_NOMEM;
1392
1393 if (!_reg_perfcount_marshall_perf_objects(ps, block, 0))
1394 return WERR_NOMEM;
1395
1396 return WERR_OK;
1397 }
1398 else
1399 {
1400 *outbuf_len = max_buf_size;
1401 if (!_reg_perfcount_marshall_perf_data_block(ps, block, 0))
1402 return WERR_NOMEM;
1403
1404 return WERR_INSUFFICIENT_BUFFER;
1405 }
1406 }
WIP