Differential D24231 Diff 70789 Mk/Scripts/print-submodule-gh_tuple.awk

Changeset View

Standalone View

Property	Old Value	New Value
svn:eol-style	null	native \ No newline at end of property
svn:mime-type	null	text/plain \ No newline at end of property

				# MAINTAINER: yuri@FreeBSD.org
				# $FreeBSD$
				0mpUnsubmitted Not Done Inline Actions No needed anymore. 0mp: No needed anymore.

				BEGIN {
				num_keys = 0
				}
				/dir/ {
				dir = $2
				if (dir == ".")
				dir = ""
				else {
				sub("^./", "", dir)
				dir = dir "/"
				}
				}
				/submodule/ {
				key = dir "/" $2
				if ($3 == "path") {
				map_module_path[key] = $4
				all_keys[num_keys++] = key
				} else if ($3 == "url") {
				map_module_url[key] = $4
				}
				map_module_dir[key] = dir
				}
				/hash/ {
				map_module_hash[dir "/" $3]=$2
				}
				END {
				print "GH_TUPLE= \\"
				idx = 0
				key = ""
				for (i = 0; i < num_keys; i++) {
				key_prev = key
				key = all_keys[i]
				url = map_module_url[key]
				if (match(url, /^(https\|git):\/\/github\.com\//)) {
				gh_account_user = url
				sub("^(https\|git)://github\.com/", "", gh_account_user)
				sub("(.git\|/)$", "", gh_account_user)
				sub("/", ":", gh_account_user)
				id = gh_account_user
				gsub("[:-]", "_", id)
				if (idx > 0 && map_module_dir[key] != map_module_dir[key_prev])
				print " \\"
				print " " gh_account_user ":" map_module_hash[map_module_dir[key] "/" map_module_path[key]] ":" id "/" map_module_dir[key] map_module_path[key] " \\"
				id_uniq[id]++
				idx++
				}
				}

				for (i = 0; i < num_keys; i++) {
				key = all_keys[i]
				if (!match(map_module_url[key], /^(https\|git):\/\/github\.com\//))
				print "# not a GitHub URL: " map_module_url[key] " " map_module_hash[key] " " map_module_dir[key] " " map_module_path[key]
				}
				}