function partir (){
$to_read = _PS_truncate_ . '/archivosUp' ; //Establecemos el directorio de lectura de archivos. Las partes se crearan en el directorio to_write.
$to_write = _PS_truncate_ . '/archivosUp/chunk' ; //Establecemos el directorio de escritura de archivos.
// Opciones No editables.
$done = false;
$part = 0;
if (($handle = fopen($to_read,'r')) !== FALSE) {
$header = fgets($handle);
while ($done == false) {
$locA = ftell($handle); // Obtiene la ubicación actual. COMIENZO
fseek($handle, $size, SEEK_CUR); // Saltar la longitud de $ size desde la posición actual
$tmp = fgets($handle); // Leer hasta el final de la línea. Queremos líneas completas
$locB = ftell($handle); // Obtiene la ubicación actual. FIN
$span = ($locB-$locA);
fseek($handle, $locA, SEEK_SET); // Saltar al inicio de este pedazo
$chunk = fread($handle,$span); // Lee, en modo binario seguro (fread), el trozo entre START y END
file_put_contents($to_write . '_' . $part.'.csv',$header.$chunk); //Escribe una cadena a un fichero (file_put_contents) formado como primer parametro por el fichero donde se escribe la información: archivo original ($to_read), guion bajo (_), la parte del csv en cuestión ($part), formato csv (.csv); como segundo parametro la información a escribir (data) encadenando $header y $chunk (lectura segura del archivo binario).
$part++;
if (strlen($chunk) < $size) $done = true; //Si la longitud del string (strlen) es menor que el tamaño indicado (Size) $done cambia a True y temina el while...
}
fclose($handle);
}
} //Cierra la función partir.
// Opciones No editables.
$done = false; $part = 0; if (($handle = fopen($to_read,'r')) !== FALSE) { $header = fgets($handle);
while ($done == false) { $locA = ftell($handle); // Obtiene la ubicación actual. COMIENZO fseek($handle, $size, SEEK_CUR); // Saltar la longitud de $ size desde la posición actual $tmp = fgets($handle); // Leer hasta el final de la línea. Queremos líneas completas $locB = ftell($handle); // Obtiene la ubicación actual. FIN $span = ($locB-$locA); fseek($handle, $locA, SEEK_SET); // Saltar al inicio de este pedazo $chunk = fread($handle,$span); // Lee, en modo binario seguro (fread), el trozo entre START y END file_put_contents($to_write . '' . $part.'.csv',$header.$chunk); //Escribe una cadena a un fichero (file_put_contents) formado como primer parametro por el fichero donde se escribe la información: archivo original ($to_read), guion bajo (), la parte del csv en cuestión ($part), formato csv (.csv); como segundo parametro la información a escribir (data) encadenando $header y $chunk (lectura segura del archivo binario). $part++;
if (strlen($chunk) < $size) $done = true; //Si la longitud del string (strlen) es menor que el tamaño indicado (Size) $done cambia a True y temina el while... } fclose($handle); }
} //Cierra la función partir.