Батник для удаления дубликатов строк в больших файлах

[ssXXXss]

три ночи мучался писал)))))

/*
@echo off && cls
set WinDirNet=%WinDir%\Microsoft.NET\Framework
IF EXIST "%WinDirNet%\v2.0.50727\csc.exe" set csc="%WinDirNet%\v2.0.50727\csc.exe"
IF EXIST "%WinDirNet%\v3.5\csc.exe" set csc="%WinDirNet%\v3.5\csc.exe"
IF EXIST "%WinDirNet%\v4.0.30319\csc.exe" set csc="%WinDirNet%\v4.0.30319\csc.exe"
%csc% /nologo /out:"%~0.exe" %0
"%~0.exe" %1
del "%~0.exe"
exit
*/

//14 aug 2015 @ 20:15

using System;
using System.Collections.Generic;
using System.IO;
using System.Text;

namespace spicemustflow_sortcleaner
{
    class Program
    {
        static string GetFilename(string nameWithoutExtension, bool uniq)
        {
            int n = 1;
            string outputFile = string.Empty;
            while (true)
            {
                outputFile = string.Format("{0}_{1}{2}.txt",
                    nameWithoutExtension, uniq ? "uniques" : "duplicates",
                    n > 1 ? n.ToString() : string.Empty);
                if (File.Exists(outputFile)) n++;
                else break;
            }
            return outputFile;
        }

        static void Main(string[] args)
        {
            string path = Path.GetDirectoryName(System.Reflection.Assembly.GetExecutingAssembly().Location) + "\\";
            string[] filelist = null;
            if (args.Length == 0) filelist = Directory.GetFiles(path, "*.txt", SearchOption.TopDirectoryOnly);
            else filelist = args;

            foreach (string filename in filelist)
            {
                Encoding enc = Encoding.Default;
                using (FileStream fs = File.OpenRead(filename))
                {
                    byte[] data = new byte[3];
                    while (fs.Read(data, 0, data.Length) > 0)
                        if (data[0] == 0xef && data[1] == 0xbb && data[2] == 0xbf)
                        {
                            enc = Encoding.UTF8;
                            break;
                        }
                        else
                        {
                            enc = Encoding.GetEncoding(1251);
                            break;
                        }
                }

                Console.Write("loading {0}..\n", filename);
                string[] input = File.ReadAllLines(filename, enc);
                if (input.Length > 0)
                {
                    Console.Write("sorting..\n");
                    Array.Sort(input);
                    List<string> uniques = new List<string>();
                    List<string> duplicates = new List<string>();
                    Console.Write("deleting duplicates..\n");
                    uniques.Add(input[0]);
                    for (int i = 1; i < input.Length; i++)
                        if (input[i] != input[i - 1])
                            uniques.Add(input[i]);
                        else
                            duplicates.Add(input[i]);

                    Console.Write("\nsaving..\n");
                    File.WriteAllLines(path + GetFilename(Path.GetFileNameWithoutExtension(filename), true), uniques.ToArray(), enc);
                    File.WriteAllLines(path + GetFilename(Path.GetFileNameWithoutExtension(filename), false), duplicates.ToArray(), enc);
                    Console.Write("\n\n");
                }
            }
        }
    }
}

кто то тут на форуме искал типо такого что бы повторы записывались отдельно и знать сколько и какие повторы были, просто переносити ваш тхт-файл на файл батника и у вас после создаётся ещё два текстовых файла, один очищенный от дублей, второй сами дубли, оригинал сохраняется как и был, проверенно на 25к строках, всё происходит пока моргнул)))

 

[opiums]

Парень, спасибо тебе огромное, я прям преблагодарен за это творение! Мой файл состоит из почти 13 млн строк, этот батник мне единственный помог, приогромнейшее спасибо!

 

[orka13]

Походу @ssXXXss создал себе виртуала, чтобы апнуть тему. таки вспомнил )))))

 

[ssXXXss]

Походу @ssXXXss создал себе виртуала, чтобы апнуть тему. таки вспомнил )))))

да если бы нашёл сам вчера в той ветке выложил, мне кажется ты нашёл и апнул чтобы на меня стрельнуть )))

 

[opiums]

вообще то я в поиске нашёл, кому интересно - может погуглить мой никнейм и наткнуться на мои сайты)

 

[one]

orka13, что то ты в последнее время чересчур подозрителен дружище. С этим надо что то делать и срочно! Не дай бог затянется!

 

[orka13]

да я же в шутку блин, неужели никто смайликов не видит? Просто действительно настолько маловероятное совпадение, что грех было не упрекнуть .

 

[ibred]

и вниательно обрати на первую строку, там прекрасно видно что это не я делал

три ночи мучался писал)))))

Так Ваш мопед или нет?

А вообще, пользуясь случаем, хочу обратить всех внимание на правила форума, в частности на пункты 6, 9 и 10.
Давайте как-то посдержанней и с пониманием относиться к друг к другу. Не нужно ругаться.

P.S. Почистил топик от необоснованного негатива.

 

[ssXXXss]

Так Ваш мопед или нет?

А вообще, пользуясь случаем, хочу обратить всех внимание на правила форума, в частности на пункты 6, 9 и 10.
Давайте как-то посдержанней и с пониманием относиться к друг к другу. Не нужно ругаться.

и три дня ))))