/usr/share/doc/mpage/Contrib/mergeps.lex is in mpage 2.5.6+dfsg-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 | %{
/*
* merge.l - Flex source
* Merges two PostScript files
*
*/
#include <stdio.h>
#ifndef TRUE
#define TRUE (1)
#endif
#ifndef FALSE
#define FALSE (0)
#endif
YY_BUFFER_STATE file1, file2;
int second_is_open = 0;
FILE *fp1, *fp2;
%}
%option noyywrap
%x SECOND_FILE
%%
^showsheet {
printf("%%%%SHOWSHEET IN FIRST FILE: Removed!\n");
BEGIN(SECOND_FILE);
if ( !second_is_open ){
second_is_open = 1;
file1 = YY_CURRENT_BUFFER;
yyin = fp2;
file2 = yy_create_buffer(yyin, YY_BUF_SIZE);
}
yy_switch_to_buffer(file2); }
<SECOND_FILE>^showpage {
printf("%%%%Next line renders the merged page.\nshowsheet\n");
BEGIN(INITIAL);
yy_switch_to_buffer(file1); }
%%
void yyerror(char *msg)
{
fprintf(stderr, "Error...\n");
exit(1);
}
main(int argc, char *argv[])
{
if ( (fp1 = fopen(argv[1], "r")) == NULL ){
fprintf(stderr, "%s: file not found!\n", argv[1]);
exit(1);
}
if ( (fp2 = fopen(argv[2], "r")) == NULL ){
fprintf(stderr, "%s: file not found!\n", argv[2]);
exit(1);
}
yyin = fp1;
yylex();
exit(0);
}
|