File: ctime.stp

package info (click to toggle)
systemtap 5.3-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 47,556 kB
  • sloc: cpp: 81,117; ansic: 54,933; xml: 49,795; exp: 43,595; sh: 11,526; python: 5,003; perl: 2,252; tcl: 1,312; makefile: 1,006; javascript: 149; lisp: 105; awk: 101; asm: 91; java: 70; sed: 16
file content (119 lines) | stat: -rw-r--r-- 2,629 bytes parent folder | download | duplicates (8)
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
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
# Note this test is written in a bit of an odd way. In systemtap 2.2
# and above, ctime will raise an error. For systemtap versions before
# 2.2, ctime returned one of three error strings. Map those error
# strings to one error.

probe begin 
{
	// epoch
	println(ctime(0))

	// epoch - 1
	println(ctime(-1))

	// epoch + 1
	println(ctime(1))

	// Some funny numbers
	println(ctime(100000000))
	println(ctime(1234567890))
	println(ctime(1073741824))
	println(ctime(0x50000000))

	// some time really long ago
	secspermin = 60
	minsperhour = 60
	hoursperday = 24
	secsperhour = secspermin * minsperhour
	secsperday = secsperhour * hoursperday
	epoch_year = 1970
	time = -1 * (epoch_year - 1000) * 365 * secsperday
	try {
		result = ctime(time)
		if (result == "far far in the future..."
		    || result == "a long, long time ago..."
		    || result == "<invalid time>")
			println("conversion error")
		else
			println(result)
	} catch {
		println("conversion error")
	}
	// some time in the far future
	time = (9999 - epoch_year) * 365 * secsperday
	try {
		result = ctime(time)
		if (result == "far far in the future..."
		    || result == "a long, long time ago..."
		    || result == "<invalid time>")
			println("conversion error")
		else
			println(result)
	} catch {
		println("conversion error")
	}

	// min 32 bit
	time = -2147483648
	println(ctime(time))

	// over the edge, a long, long time ago...
	time--
	try {
		result = ctime(time)
		if (result == "far far in the future..."
		    || result == "a long, long time ago..."
		    || result == "<invalid time>")
			println("conversion error")
		else
			println(result)
	} catch {
		println("conversion error")
	}

	// max 32 bit
	time = 2147483647
	println(ctime(time))

	// over the edge, far far in the future...
	time++
	try {
		result = ctime(time)
		if (result == "far far in the future..."
		    || result == "a long, long time ago..."
		    || result == "<invalid time>")
			println("conversion error")
		else
			println(result)
	} catch {
		println("conversion error")
	}

	// min 64 bit
	try {
		result = ctime(-9223372036854775808)
		if (result == "far far in the future..."
		    || result == "a long, long time ago..."
		    || result == "<invalid time>")
			println("conversion error")
		else
			println(result)
	} catch {
		println("conversion error")
	}

	// max 64 bit
	try {
		result = ctime(9223372036854775807)
		if (result == "far far in the future..."
		    || result == "a long, long time ago..."
		    || result == "<invalid time>")
			println("conversion error")
		else
			println(result)
	} catch {
		println("conversion error")
	}

	exit()
}