diff --git a/scripts/rpmsetinit/compare_sisyphus_set_versions.sh b/scripts/old/compare_sisyphus_set_versions.sh
similarity index 100%
rename from scripts/rpmsetinit/compare_sisyphus_set_versions.sh
rename to scripts/old/compare_sisyphus_set_versions.sh
diff --git a/scripts/rpmsetinit/completed_set_versions.awk b/scripts/old/completed_set_versions.awk
similarity index 100%
rename from scripts/rpmsetinit/completed_set_versions.awk
rename to scripts/old/completed_set_versions.awk
diff --git a/scripts/rpmsetinit/newset_mkset.c b/scripts/old/newset_mkset.c
similarity index 100%
rename from scripts/rpmsetinit/newset_mkset.c
rename to scripts/old/newset_mkset.c
diff --git a/scripts/rpmsetinit/parse_sisyphus_packages.awk b/scripts/old/parse_sisyphus_packages.awk
similarity index 100%
rename from scripts/rpmsetinit/parse_sisyphus_packages.awk
rename to scripts/old/parse_sisyphus_packages.awk
diff --git a/scripts/rpmsetinit/rpm_payload_safety.sh b/scripts/old/rpm_payload_safety.sh
similarity index 100%
rename from scripts/rpmsetinit/rpm_payload_safety.sh
rename to scripts/old/rpm_payload_safety.sh
diff --git a/scripts/rpmsetinit/mkset.c b/scripts/rpmsetinit/mkset.c
new file mode 100644
index 0000000..1b87f0e
--- /dev/null
+++ b/scripts/rpmsetinit/mkset.c
@@ -0,0 +1,30 @@
+#include <stdio.h>
+#include <stdlib.h>
+#include <assert.h>
+#include "set.h"
+
+int main(int argc, const char **argv)
+{
+    assert(argc == 2);
+    int bpp = atoi(argv[1]);
+    assert(bpp >= 10);
+    assert(bpp <= 32);
+    struct set *set = set_new();
+    char *line = NULL;
+    size_t alloc_size = 0;
+    ssize_t len;
+    int added = 0;
+    while ((len = getline(&line, &alloc_size, stdin)) >= 0) {
+	if (len > 0 && line[len-1] == '\n')
+	    line[--len] = '\0';
+	if (len == 0)
+	    continue;
+	set_add(set, line);
+	added++;
+    }
+    assert(added > 0);
+    const char *str = set_fini(set, bpp);
+    assert(str);
+    printf("set:%s\n", str);
+    return 0;
+}