[pve-cluster.git] / data / PVE / Cluster / IPCConst.pm.awk

BEGIN {
    print "package PVE::Cluster::IPCConst;"
    print "use strict; use warnings;"
    print
    print "use base 'Exporter';"
    print
    print "my %IPC_OPS;"
    print "BEGIN {"
    print "  %IPC_OPS = ("
}

/^#define CFS_IPC/ {
    print "    " $2, "=>", $3 ","
}

END {
    print "  );"
    print "}"
    print "use constant \\%IPC_OPS;"
    print "our @EXPORT = keys(%IPC_OPS);"
}
Commit	Line	Data
95c44445 TL	1	BEGIN {
	2	print "package PVE::Cluster::IPCConst;"
	3	print "use strict; use warnings;"
	4	print
	5	print "use base 'Exporter';"
	6	print
	7	print "my %IPC_OPS;"
	8	print "BEGIN {"
	9	print " %IPC_OPS = ("
	10	}
	11
	12	/^#define CFS_IPC/ {
	13	print " " $2, "=>", $3 ","
	14	}
	15
	16	END {
	17	print " );"
	18	print "}"
	19	print "use constant \\%IPC_OPS;"
	20	print "our @EXPORT = keys(%IPC_OPS);"
	21	}