Remove DH-AES/DH-BLOWFISH mechanisms and misc cleanup - torxchat.git - Unnamed repository; edit this file 'description' to name the repository.

diff options

author	Patrick Griffis <tingping@tingping.se>	2016-01-29 17:41:08 -0500
committer	Patrick Griffis <tingping@tingping.se>	2016-01-29 17:41:08 -0500
commit	4362085847f359ed13df6f8f488a06eb52ecd767 (patch)
tree	f03818cefe6c641c6567f36ecd7c0a2196830f4d /plugins/winamp/winamp.c
parent	6b62c4738d4b1f5cb1bc70bf58f6a078630e6ef5 (diff)

Remove DH-AES/DH-BLOWFISH mechanisms and misc cleanup

- AES and Blowfish mechanisms are deemed insecure and servers
  have removed support for them
- Remove attempts to retry since we only support one mech
- Handle SASL 3.2's new syntax for supported mechs

Diffstat (limited to 'plugins/winamp/winamp.c')

0 files changed, 0 insertions, 0 deletions

#!/usr/bin/perl use strict; use warnings; sub header { my $file = shift; open my $input, "<", $file or die "Couldn't open '$file':$!"; my @file = <$input>; close $file; return toc(@file); } sub toc { my @lines = @_; for( @lines ) { if( /^\s*$/s ) { $_ = qq{"\\n"\n}; next; } if( /^\s*#/ ) { $_ = qq{"\\n"\n}; next; } s/\\/\\\\/g; # double the number of \'s s/"/\\"/g; s/^\s*/"/; s/\n/\\n"\n/; } return @lines; } for my $files ( [ "xchat.pm.h", # output file "lib/Xchat.pm", # input files "lib/Xchat/Embed.pm", "lib/Xchat/List/Network.pm", "lib/Xchat/List/Network/Entry.pm", "lib/Xchat/List/Network/AutoJoin.pm", ], [ "irc.pm.h", # output file "lib/IRC.pm" # input file ] ) { my ($output,@inputs) = @$files; open my $header, ">", $output or die "Couldn't open '$output': $!"; print $header qq["BEGIN {\\n"\n]; for my $input ( @inputs ) { (my $trimmed = $input) =~ s{^lib/}{}; print $header qq["\$INC{'$trimmed'} = 'Compiled into the plugin.';\\n"\n]; } print $header qq["}\\n"\n]; for my $input ( @inputs ) { print $header qq["{\\n"\n]; print $header qq{"#line 1 \\"$input\\"\\n"\n}; print $header header( $input ); print $header qq["}\\n"\n]; } close $header; }


context:
space:
mode: