diff --git a/mcrypt-CVE-2012-4426.patch b/mcrypt-CVE-2012-4426.patch
new file mode 100644
index 0000000..747f428
--- mcrypt-2.6.8/src/errors.c
+++ mcrypt-2.6.8/src/errors.c
@@ -25,24 +25,24 @@
 
 void err_quit(char *errmsg)
 {
-	fprintf(stderr, errmsg);
+	fprintf(stderr, "%s", errmsg);
 	exit(-1);
 }
 
 void err_warn(char *errmsg)
 {
 	if (quiet <= 1)
-		fprintf(stderr, errmsg);
+		fprintf(stderr, "%s", errmsg);
 }
 
 void err_info(char *errmsg)
 {
 	if (quiet == 0)
-		fprintf(stderr, errmsg);
+		fprintf(stderr, "%s", errmsg);
 }
 
 void err_crit(char *errmsg)
 {
 	if (quiet <= 2)
-		fprintf(stderr, errmsg);
+		fprintf(stderr, "%s", errmsg);
 }

---
99e8c7be'/><select name='h' onchange='this.form.submit();'>
<option value='koszko' selected='selected'>koszko</option>
<option value='koszko-scripts'>koszko-scripts</option>
</select> <input type='submit' value='switch'/></form></td></tr>
<tr><td class='sub'>Wojtek's customized Guix</td><td class='sub right'></td></tr></table>
<table class='tabs'><tr><td>
<a href='/guix/about/'>about</a><a href='/guix/'>summary</a><a href='/guix/refs/?id=b2b0179ec71a8d2e6686878d873354c599e8c7be'>refs</a><a class='active' href='/guix/log/tests/union.scm'>log</a><a href='/guix/tree/tests/union.scm?id=b2b0179ec71a8d2e6686878d873354c599e8c7be'>tree</a><a href='/guix/commit/tests/union.scm?id=b2b0179ec71a8d2e6686878d873354c599e8c7be'>commit</a><a href='/guix/diff/tests/union.scm?id=b2b0179ec71a8d2e6686878d873354c599e8c7be'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/tests/union.scm'>
<input type='hidden' name='id' value='b2b0179ec71a8d2e6686878d873354c599e8c7be'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=b2b0179ec71a8d2e6686878d873354c599e8c7be'>root</a>/<a href='/guix/log/tests?id=b2b0179ec71a8d2e6686878d873354c599e8c7be'>tests</a>/<a href='/guix/log/tests/union.scm?id=b2b0179ec71a8d2e6686878d873354c599e8c7be'>union.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/tests/union.scm?id=b2b0179ec71a8d2e6686878d873354c599e8c7be&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2019-06-14 21:57:39 +0200'>2019-06-14</span></td><td><a href='/guix/commit/tests/union.scm?id=03d76577b96ba81c9921eb3a297d42db8644280b'>tests: Make builds less expensive.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2018-09-23 09:46:25 +0200'>2018-09-23</span></td><td><a href='/guix/commit/tests/union.scm?id=c362904485d3c8c3f155538ab2f7cd082b334801'>bootstrap: %bootstrap-inputs+toolchain: Replace %bootstrap-inputs.</a><span class='msg-avail'>...</span></td><td>Jan Nieuwenhuizen</td></tr>
<tr><td><span title='2018-09-22 22:40:12 +0200'>2018-09-22</span></td><td><a href='/guix/commit/tests/union.scm?id=a2b2070b679ff7e92d856c7d6775f5f67ce4792d'>bootstrap: %bootstrap-inputs: Wrap input lists into thunks.</a><span class='msg-avail'>...</span></td><td>Jan Nieuwenhuizen</td></tr>
<tr><td><span title='2018-05-10 14:53:56 +0200'>2018-05-10</span></td><td><a href='/guix/commit/tests/union.scm?id=dac1c97d131d297134fa878ac240d9ec0127044b'>union: Add 'relative-file-name'.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2018-04-08 17:41:08 +0200'>2018-04-08</span></td><td><a href='/guix/commit/tests/union.scm?id=e40aa54e98aa6329e6196fd29e7e4e34ce3a063c'>union: Allow callers to choose the collision resolution policy.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2017-03-26 12:53:48 +0200'>2017-03-26</span></td><td><a href='/guix/commit/tests/union.scm?id=addce19e2d38a197f5ea10eefb5f3cd25c3a52e7'>union: Add create-all-directories? parameter to 'union-build'.</a><span class='msg-avail'>...</span></td><td>Huang Ying</td></tr>