summaryrefslogtreecommitdiffstats
path: root/tapset/dev.stp
blob: 2c22031add72579a77e53a7b485c68cc18d03d77 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
// Device tapset
// Copyright (C) 2008, 2010 Red Hat Corp.
//
// This file is part of systemtap, and is free software.  You can
// redistribute it and/or modify it under the terms of the GNU General
// Public License (GPL); either version 2, or (at your option) any
// later version.

%{
#include <linux/kdev_t.h>
%}

function MAJOR:long(dev:long)
%{ /* pure */
    THIS->__retvalue = MAJOR(THIS->dev);
%}


function MINOR:long(dev:long)
%{ /* pure */
    THIS->__retvalue = MINOR(THIS->dev);
%}


function MKDEV:long(major:long, minor:long)
%{ /* pure */
    THIS->__retvalue = MKDEV(THIS->major,THIS->minor);
%}

function usrdev2kerndev:long(dev:long)
%{ /* pure */
    THIS->__retvalue = new_decode_dev(THIS->dev);
%}

function bdevname:string(bdev:long)
{
	if (bdev == 0)
		return "N/A"

	hd = @cast(bdev, "block_device")->bd_disk

	if (@cast(bdev, "block_device")->bd_part)
		partno = @cast(bdev, "block_device")->bd_part->partno
	else
		partno = MINOR(@cast(bdev, "block_device")->bd_dev)
			- @cast(bdev, "block_device")->bd_disk->first_minor;

	if (!partno)
		return kernel_string(@cast(hd, "gendisk")->disk_name)
	disk_name = kernel_string(@cast(hd, "gendisk")->disk_name)
	if (isdigit(substr(disk_name, strlen(disk_name) - 1, 1)))
		return sprintf("%sp%d", disk_name, partno)
	else
		return sprintf("%s%d", disk_name, partno)
}