CryptDecode con modificador CRYPT_ARCH_ZIP - ¿Cómo utilizarlo? - página 6
Está perdiendo oportunidades comerciales:
- Aplicaciones de trading gratuitas
- 8 000+ señales para copiar
- Noticias económicas para analizar los mercados financieros
Registro
Entrada
Usted acepta la política del sitio web y las condiciones de uso
Si no tiene cuenta de usuario, regístrese
Descomprimir archivos ZIP estándar
(por ahora, sólo con un archivo empaquetado en el archivo, más adelante lo haré para varios (si es necesario) )
Descomprimir archivos ZIP estándar
(por ahora, sólo con un archivo empaquetado en el archivo, más adelante lo haré para varios (si es necesario) )
¿Así que tiene su propio archivo?
y yo era feliz )
ZS: seguramente aunque sólo sea el suyo ya es grande
¿Así que tiene su propio archivo?
y yo era feliz )
ZS: seguramente aunque sólo sea el suyo ya es grande
¡Vasiliy!
¿Es necesario hacerlo o no?
¡Vasiliy!
¿Hay que hacerlo o no?
Todavía no. Veremos los comentarios de MQ el lunes. Por el post de Alexander está claro que es tu archivador de zip. Otros archivos su código no se descompone:
Tuve problemas para descomprimir causando un error interno (4024)
s.s. Al menos el error es diferente.
Descomprime archivos ZIP estándar.
(por ahora, sólo con un archivo empaquetado en el archivo, luego lo haré para varios (si es necesario) )
Todavía no. Veremos los comentarios de MQ el lunes. Por el post de Alexander está claro que es tu archivador de zip. Otros archivos su código no se descomprime:
s.s. Al menos el error es diferente.
Otra pregunta. Qué archivador zip utilizó para crear el archivo y qué parámetros utilizó (relación de compresión, tamaño del diccionario).WinRar con la configuración por defecto.
Sé cómo descomprimir todos los archivos.
Pero se necesita un poco para averiguar los 4 bytes del empaquetador MQ
Si es necesario, lo haré.
Puede que MQ no responda:)
Los últimos 4 bytes del paquete MQ son hash o CRC
(información de servicio).
Pero no está claro si se trata de los datos empaquetados o de los datos brutos.
Habrá que esperar la respuesta de MQ
Mientras tanto, es así:
//+------------------------------------------------------------------+ //| Zip_decoder.mqh | //| Copyright 2015, Mikalas | //| https://www.mql5.com | //+------------------------------------------------------------------+ struct ZIP_HEADER { uint sign; ushort a_version; ushort bit_flag; ushort comp_method; ushort last_mod_time; ushort last_mod_date; int crc_32; uint pack_size; uint unpack_size; ushort fn_len; ushort extr_field_len; }; // ZIP_HEADER zip_header; bool f_found; //+------------------------------------------------------------------+ //| Get entryes in ZIP file | //+------------------------------------------------------------------+ uint GetEntryesZip( const string file_name, string &f_names[] ) { uint a_cnt = 0; uchar array[]; int handle = FileOpen( file_name, FILE_READ | FILE_BIN ); if ( handle != INVALID_HANDLE ) { ulong file_size = FileSize( handle ); if ( file_size > 0 ) { while ( FileTell( handle ) < file_size - 4 ) { zip_header.sign = FileReadInteger( handle, 4 ); if ( zip_header.sign == 0x04034b50 ) { a_cnt++; ArrayResize( f_names, a_cnt ); f_names[ a_cnt - 1] = ""; FileSeek( handle, -4, SEEK_CUR ); FileReadStruct( handle, zip_header ); if ( zip_header.extr_field_len != 0 ) { FileSeek( handle, zip_header.extr_field_len, SEEK_CUR ); } ArrayResize( array, int( zip_header.fn_len ) ); uint fn_res = FileReadArray( handle, array, 0, int( zip_header.fn_len ) ); for ( int i = 0; i < int( fn_res ); i++ ) { f_names[a_cnt - 1] += CharToString( array[i] ); } FileSeek( handle, zip_header.pack_size, SEEK_CUR ); } } } FileClose( handle ); } return( a_cnt ); } bool GetFile( const string src_name, const string dest_name, const int position, uchar &unp_data[] ) { uchar array[]; uchar key[]; f_found = false; int f_cnt = 0; int handle = FileOpen( src_name, FILE_READ | FILE_BIN ); if ( handle != INVALID_HANDLE ) { ulong file_size = FileSize( handle ); if ( file_size > 0 ) { while ( FileTell( handle ) < file_size - 4 ) { zip_header.sign = FileReadInteger( handle, 4 ); if ( zip_header.sign == 0x04034b50 ) { f_cnt++; FileSeek( handle, -4, SEEK_CUR ); FileReadStruct( handle, zip_header ); if ( zip_header.extr_field_len != 0 ) { FileSeek( handle, zip_header.extr_field_len, SEEK_CUR ); } ArrayResize( array, int( zip_header.fn_len ) ); uint fn_res = FileReadArray( handle, array, 0, int( zip_header.fn_len ) ); string file_name = ""; for ( int i = 0; i < int( fn_res ); i++ ) { file_name += CharToString( array[i] ); } if ( ( file_name == dest_name ) && ( position == f_cnt - 1 ) ) { f_found = true; ArrayResize( array, int( zip_header.pack_size ) + 6 ); uint ar_res = FileReadArray( handle, array, 2, int( zip_header.pack_size ) ); if ( ar_res == uint( zip_header.pack_size ) ) { array[0] = 0x78; array[1] = 0x5E; array[int( zip_header.pack_size ) + 2] = 193; //Wait MQ !!!!!!!!!!!!!!!!!!!!!!!!! array[int( zip_header.pack_size ) + 3] = 12; //Wait MQ !!!!!!!!!!!!!!!!!!!!!!!! array[int( zip_header.pack_size ) + 4] = 31; //Wait MQ !!!!!!!!!!!!!!!!!!!!!!!!! array[int( zip_header.pack_size ) + 5] = 159; //Wait MQ !!!!!!!!!!!!!!!!!!!!!!!!!!! ArrayResize( key, int( zip_header.pack_size ) + 6 ); for ( int j = 0; j < int( zip_header.pack_size ) + 6; j++ ) key[j] = 0; ResetLastError(); int dec_res = CryptDecode( CRYPT_ARCH_ZIP, array, key, unp_data ); if ( dec_res == int( zip_header.unpack_size ) ) { FileClose( handle ); return( true ); } else { Print( " Ошибка распаковки = ", GetLastError() ); FileClose( handle ); return( false ); } } break; } if ( f_found ) break; FileSeek( handle, zip_header.pack_size, SEEK_CUR ); } } } FileClose( handle ); } return( false ); }Funciones de llamada:
Extrae el segundo fichero (GAZR-6.15.dat) del archivo. El archivo está hecho por WinRar con la configuración estándar.
En la función GetFile() la posición del parámetro (1), es necesaria para la identificación exacta del fichero en el archivo ZIP.
El archivo puede contener ficheros con nombres idénticos.