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