--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/dev/gsm0611-silence-fr.c	Sat Nov 19 04:04:01 2022 +0000
@@ -0,0 +1,49 @@
+/*
+ * This program is meant to be run only once by the developer - it uses
+ * libgsm function gsm_implode() to transform the idle frame of GSM 06.11
+ * (3GPP TS 46.011) from the table format given in the spec into
+ * libgsm/RTP format.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <strings.h>
+#include <gsm.h>
+
+static const gsm_signal lar_params[8] = {42, 39, 21, 10, 9, 4, 3, 2};
+static const gsm_signal subframe_params[17] =
+	{0, 40, 1, 0,  3, 4, 3, 4, 4,  3, 3, 3, 3, 4, 4, 3, 3};
+
+main(argc, argv)
+	char **argv;
+{
+	gsm state;
+	gsm_signal params[76];
+	gsm_byte frame[33];
+	unsigned n;
+
+	/* gsm_implode() requires dummy state */
+	state = gsm_create();
+	if (!state) {
+		fprintf(stderr, "gsm_create() failed!\n");
+		exit(1);
+	}
+	/* gather params */
+	bcopy(lar_params, params, sizeof(gsm_signal) * 8);
+	bcopy(subframe_params, params + 8, sizeof(gsm_signal) * 17);
+	bcopy(subframe_params, params + 25, sizeof(gsm_signal) * 17);
+	bcopy(subframe_params, params + 42, sizeof(gsm_signal) * 17);
+	bcopy(subframe_params, params + 59, sizeof(gsm_signal) * 17);
+	/* generate frame */
+	gsm_implode(state, params, frame);
+	/* print the frame */
+	for (n = 0; n < 33; n++) {
+		printf("0x%02X,", frame[n]);
+		if (n == 4 || n == 11 || n == 18 || n == 25 || n == 32)
+			putchar('\n');
+		else
+			putchar(' ');
+	}
+	exit(0);
+}