21 lines
782 B
C
21 lines
782 B
C
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
|
|
void labashka(unsigned short (*pop)(void), void (*push)(unsigned short), size_t (*len)(void), size_t max_size ) {
|
|
unsigned short modelen = pop();
|
|
char *mode = calloc(modelen, sizeof(char));
|
|
for (short i = modelen - 1; i != -1; i--)
|
|
mode[i] = pop();
|
|
|
|
unsigned short filenamelen = pop();
|
|
char *filename = calloc(filenamelen, sizeof(char));
|
|
for (short i = filenamelen - 1; i != -1; i--)
|
|
filename[i] = pop();
|
|
|
|
FILE *file = fopen(filename, mode);
|
|
push((short)((0xFFFF000000000000 & (long)file) >> (16*3) ));
|
|
push((short)((0x0000FFFF00000000 & (long)file) >> (16*2) ));
|
|
push((short)((0x00000000FFFF0000 & (long)file) >> (16*1) ));
|
|
push((short)((0x000000000000FFFF & (long)file) >> (16*0) ));
|
|
}
|