[p5sagit/p5-mst-13.2.git] / lib / Parse / CPAN / Meta / t / 11_meta_yml.t

#!/usr/bin/perl

# Testing of common META.yml examples

BEGIN {
	if( $ENV{PERL_CORE} ) {
		chdir 't';
		@INC = ('../lib', 'lib');
	}
	else {
		unshift @INC, 't/lib/';
	}
}

use strict;
BEGIN {
	$|  = 1;
	$^W = 1;
}

use File::Spec::Functions ':ALL';
use Parse::CPAN::Meta::Test;
use Test::More tests(8, 3);


#####################################################################
# Testing YAML::Tiny's own META.yml file

yaml_ok(
	<<'END_YAML',
abstract: Read/Write YAML files with as little code as possible
author: 'Adam Kennedy <cpan@ali.as>'
build_requires:
  File::Spec: 0.80
  Test::More: 0.47
distribution_type: module
generated_by: Module::Install version 0.63
license: perl
name: YAML-Tiny
no_index:
  directory:
    - inc
    - t
requires:
  perl: 5.005
version: 0.03
END_YAML
	[ {
		abstract          => 'Read/Write YAML files with as little code as possible',
		author            => 'Adam Kennedy <cpan@ali.as>',
		build_requires    => {
			'File::Spec' => '0.80',
			'Test::More' => '0.47',
		},
		distribution_type => 'module',
		generated_by      => 'Module::Install version 0.63',
		license           => 'perl',
		name              => 'YAML-Tiny',
		no_index          => {
			directory    => [ qw{inc t} ],
		},
		requires          => {
			perl         => '5.005',
		},
		version           => '0.03',
	} ],
	'YAML::Tiny',
);


#####################################################################
# Testing a META.yml from a commercial project that crashed

yaml_ok(
	<<'END_YAML',
# http://module-build.sourceforge.net/META-spec.html
#XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX#
name:         ITS-SIN-FIDS-Content-XML
version:      0.01
version_from: lib/ITS/SIN/FIDS/Content/XML.pm
installdirs:  site
requires:
    Test::More:                    0.45
    XML::Simple:                   2

distribution_type: module
generated_by: ExtUtils::MakeMaker version 6.30
END_YAML
	[ {
		name              => 'ITS-SIN-FIDS-Content-XML',
		version           => "0.01",
		version_from      => 'lib/ITS/SIN/FIDS/Content/XML.pm',
		installdirs       => 'site',
		requires          => {
			'Test::More'  => 0.45,
			'XML::Simple' => 2,
			},
		distribution_type => 'module',
		generated_by      => 'ExtUtils::MakeMaker version 6.30',
	} ],
	'YAML::Tiny',
);


#####################################################################
# Testing various failing META.yml files from CPAN

yaml_ok(
	<<'END_YAML',
---
abstract: Mii in Nintendo Wii data parser and builder
author: Toru Yamaguchi <zigorou@cpan.org>
distribution_type: module
generated_by: Module::Install version 0.65
license: perl
meta-spec:
  url: http://module-build.sourceforge.net/META-spec-v1.3.html
  version: 1.3
name: Games-Nintendo-Wii-Mii
no_index:
  directory:
    - inc
    - t
requires:
  Carp: 1.03
  Class::Accessor::Fast: 0.3
  File::Slurp: 9999.12
  IO::File: 1.1
  Readonly: 0
  Tie::IxHash: 1.21
  URI: 1.35
  XML::LibXML: 1.62
version: 0.02
END_YAML
	[ {
		abstract => 'Mii in Nintendo Wii data parser and builder',
		author   => 'Toru Yamaguchi <zigorou@cpan.org>',
		distribution_type => 'module',
		generated_by => 'Module::Install version 0.65',
		license => 'perl',
		'meta-spec' => {
			url => 'http://module-build.sourceforge.net/META-spec-v1.3.html',
			version => '1.3',
		},
		name => 'Games-Nintendo-Wii-Mii',
		no_index => {
			directory => [ qw{ inc t } ],
		},
		requires => {
			'Carp' => '1.03',
			'Class::Accessor::Fast' => '0.3',
			'File::Slurp' => '9999.12',
			'IO::File'    => '1.1',
			'Readonly'    => '0',
			'Tie::IxHash' => '1.21',
			'URI'         => '1.35',
			'XML::LibXML' => '1.62',
		},
		version => '0.02',
	} ],
	'Games-Nintendo-Wii-Mii',
);

yaml_ok(
	<<'END_YAML',
# http://module-build.sourceforge.net/META-spec.html
#XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX#
name:         Acme-Time-Baby
version:      2.106
version_from: Baby.pm
installdirs:  site
requires:
    warnings:

distribution_type: module
generated_by: ExtUtils::MakeMaker version 6.17
END_YAML
	[ {
		name => 'Acme-Time-Baby',
		version => '2.106',
		version_from => 'Baby.pm',
		installdirs => 'site',
		requires => {
			warnings => undef,
		},
		distribution_type => 'module',
		generated_by => 'ExtUtils::MakeMaker version 6.17',
	} ],
	'Acme-Time-Baby',
	noyamlperl => 1,
);


#####################################################################
# File with a YAML header

yaml_ok(
	<<'END_YAML',
--- #YAML:1.0
name:     Data-Swap
version:  0.05
license:  perl
distribution_type: module
requires:
   perl:  5.6.0
dynamic_config: 0
END_YAML
	[ {
		name => 'Data-Swap',
		version => '0.05',
		license => 'perl',
		distribution_type => 'module',
		requires => {
			perl => '5.6.0',
		},
		dynamic_config => '0',
	} ],
	'Data-Swap',
	nosyck => 1,
);


#####################################################################
# Various files that fail for unknown reasons

SCOPE: {
	my $content = load_ok(
		'Template-Provider-Unicode-Japanese.yml',
		catfile( test_data_directory(), 'Template-Provider-Unicode-Japanese.yml' ),
		100
	);
	yaml_ok(
		$content,
		[ {
			abstract => 'Decode all templates by Unicode::Japanese',
			author   => 'Hironori Yoshida C<< <yoshida@cpan.org> >>',
			distribution_type => 'module',
			generated_by => 'Module::Install version 0.65',
			license => 'perl',
			'meta-spec' => {
				url => 'http://module-build.sourceforge.net/META-spec-v1.3.html',
				version => '1.3',
			},
			name => 'Template-Provider-Unicode-Japanese',
			no_index => {
				directory => [ qw{ inc t } ],
			},
			requires => {
				'Template::Config' => 0,
				'Unicode::Japanese' => 0,
				perl => '5.6.0',
				version => '0',
			},
			version => '1.2.1',
		} ],
		'Template-Provider-Unicode-Japanese',
		noyamlperl => 1,
	);
}

SCOPE: {
	my $content = load_ok(
		'HTML-WebDAO.yml',
		catfile( test_data_directory(), 'HTML-WebDAO.yml' ),
		100
	);
	yaml_ok(
		$content,
		[ {
			abstract => 'Perl extension for create complex web application',
			author   => [
				'Zahatski Aliaksandr, E<lt>zagap@users.sourceforge.netE<gt>',
			],
			license  => 'perl',
			name     => 'HTML-WebDAO',
			version  => '0.04',
		} ],
		'HTML-WebDAO',
		nosyck => 1,
	);
}

SCOPE: {
	my $content = load_ok(
		'Spreadsheet-Read.yml',
		catfile( test_data_directory(), 'Spreadsheet-Read.yml' ),
		100
	);
	yaml_ok(
		$content,
		[ {
			'resources' => {
				'license' => 'http://dev.perl.org/licenses/'
			},
			'meta-spec' => {
				'version' => '1.4',
				'url' => 'http://module-build.sourceforge.net/META-spec-v1.4.html'
			},
			'distribution_type' => 'module',
			'generated_by' => 'Author',
			'version' => 'VERSION',
			'name' => 'Read',
			'author' => [
				'H.Merijn Brand <h.m.brand@xs4all.nl>'
			],
			'license' => 'perl',
			'build_requires' => {
				'Test::More' => '0',
				'Test::Harness' => '0',
				'perl' => '5.006'
			},
			'provides' => {
				'Spreadsheet::Read' => {
					'version' => 'VERSION',
					'file' => 'Read.pm'
				}
			},
			'optional_features' => [
				{
					'opt_csv' => {
						'requires' => {
							'Text::CSV_XS' => '0.23'
						},
						'recommends' => {
							'Text::CSV_PP' => '1.10',
							'Text::CSV_XS' => '0.58',
							'Text::CSV' => '1.10'
						},
						'description' => 'Provides parsing of CSV streams'
					}
				},
				{
					'opt_excel' => {
						'requires' => {
							'Spreadsheet::ParseExcel' => '0.26',
							'Spreadsheet::ParseExcel::FmtDefault' => '0'
						},
						'recommends' => {
							'Spreadsheet::ParseExcel' => '0.42'
						},
						'description' => 'Provides parsing of Microsoft Excel files'
					}
				},
				{
					'opt_excelx' => {
						'requires' => {
							'Spreadsheet::XLSX' => '0.07'
						},
						'description' => 'Provides parsing of Microsoft Excel 2007 files'
					}
				},
				{
					'opt_oo' => {
						'requires' => {
							'Spreadsheet::ReadSXC' => '0.2'
						},
						'description' => 'Provides parsing of OpenOffice spreadsheets'
					}
				},
				{
					'opt_tools' => {
						'recommends' => {
							'Tk::TableMatrix::Spreadsheet' => '0',
							'Tk::NoteBook' => '0',
							'Tk' => '0'
						},
						'description' => 'Spreadsheet tools'
					}
				}
			],
			'requires' => {
				'perl' => '5.006',
				'Data::Dumper' => '0',
				'Exporter' => '0',
				'Carp' => '0'
			},
			'recommends' => {
				'perl' => '5.008005',
				'IO::Scalar' => '0',
				'File::Temp' => '0.14'
			},
			'abstract' => 'Meta-Wrapper for reading spreadsheet data'
		} ],
		'Spreadsheet-Read',
		noyamlpm   => 1,
		noyamlperl => 1,
	);
}
Commit	Line	Data
be96f5c3	1	#!/usr/bin/perl
	2
	3	# Testing of common META.yml examples
	4
	5	BEGIN {
	6	if( $ENV{PERL_CORE} ) {
	7	chdir 't';
	8	@INC = ('../lib', 'lib');
	9	}
	10	else {
	11	unshift @INC, 't/lib/';
	12	}
	13	}
	14
	15	use strict;
	16	BEGIN {
	17	$\| = 1;
	18	$^W = 1;
	19	}
	20
	21	use File::Spec::Functions ':ALL';
	22	use Parse::CPAN::Meta::Test;
de044c36	23	use Test::More tests(8, 3);
be96f5c3	24
	25
	26
	27
	28
	29	#####################################################################
de044c36	30	# Testing YAML::Tiny's own META.yml file
be96f5c3	31
	32	yaml_ok(
	33	<<'END_YAML',
	34	abstract: Read/Write YAML files with as little code as possible
	35	author: 'Adam Kennedy <cpan@ali.as>'
	36	build_requires:
	37	File::Spec: 0.80
	38	Test::More: 0.47
	39	distribution_type: module
	40	generated_by: Module::Install version 0.63
	41	license: perl
	42	name: YAML-Tiny
	43	no_index:
	44	directory:
	45	- inc
	46	- t
	47	requires:
	48	perl: 5.005
	49	version: 0.03
	50	END_YAML
	51	[ {
	52	abstract => 'Read/Write YAML files with as little code as possible',
	53	author => 'Adam Kennedy <cpan@ali.as>',
	54	build_requires => {
	55	'File::Spec' => '0.80',
	56	'Test::More' => '0.47',
	57	},
	58	distribution_type => 'module',
	59	generated_by => 'Module::Install version 0.63',
	60	license => 'perl',
	61	name => 'YAML-Tiny',
	62	no_index => {
	63	directory => [ qw{inc t} ],
	64	},
	65	requires => {
	66	perl => '5.005',
	67	},
	68	version => '0.03',
	69	} ],
	70	'YAML::Tiny',
	71	);
	72
	73
	74
	75
	76
	77
	78	#####################################################################
	79	# Testing a META.yml from a commercial project that crashed
	80
	81	yaml_ok(
	82	<<'END_YAML',
	83	# http://module-build.sourceforge.net/META-spec.html
	84	#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
	85	name: ITS-SIN-FIDS-Content-XML
	86	version: 0.01
	87	version_from: lib/ITS/SIN/FIDS/Content/XML.pm
	88	installdirs: site
	89	requires:
	90	Test::More: 0.45
	91	XML::Simple: 2
	92
	93	distribution_type: module
	94	generated_by: ExtUtils::MakeMaker version 6.30
95	END_YAML
96	[ {
97	name => 'ITS-SIN-FIDS-Content-XML',
c59d1bfa	98	version => "0.01",
be96f5c3	99	version_from => 'lib/ITS/SIN/FIDS/Content/XML.pm',
	100	installdirs => 'site',
	101	requires => {
	102	'Test::More' => 0.45,
	103	'XML::Simple' => 2,
	104	},
	105	distribution_type => 'module',
	106	generated_by => 'ExtUtils::MakeMaker version 6.30',
	107	} ],
	108	'YAML::Tiny',
	109	);
	110
	111
	112
	113
	114
	115
	116	#####################################################################
	117	# Testing various failing META.yml files from CPAN
	118
	119	yaml_ok(
	120	<<'END_YAML',
	121	---
	122	abstract: Mii in Nintendo Wii data parser and builder
	123	author: Toru Yamaguchi <zigorou@cpan.org>
	124	distribution_type: module
	125	generated_by: Module::Install version 0.65
	126	license: perl
	127	meta-spec:
	128	url: http://module-build.sourceforge.net/META-spec-v1.3.html
	129	version: 1.3
	130	name: Games-Nintendo-Wii-Mii
	131	no_index:
	132	directory:
	133	- inc
	134	- t
	135	requires:
	136	Carp: 1.03
	137	Class::Accessor::Fast: 0.3
	138	File::Slurp: 9999.12
	139	IO::File: 1.1
	140	Readonly: 0
	141	Tie::IxHash: 1.21
	142	URI: 1.35
	143	XML::LibXML: 1.62
	144	version: 0.02
	145	END_YAML
	146	[ {
	147	abstract => 'Mii in Nintendo Wii data parser and builder',
	148	author => 'Toru Yamaguchi <zigorou@cpan.org>',
	149	distribution_type => 'module',
	150	generated_by => 'Module::Install version 0.65',
	151	license => 'perl',
	152	'meta-spec' => {
	153	url => 'http://module-build.sourceforge.net/META-spec-v1.3.html',
	154	version => '1.3',
	155	},
	156	name => 'Games-Nintendo-Wii-Mii',
	157	no_index => {
	158	directory => [ qw{ inc t } ],
	159	},
	160	requires => {
	161	'Carp' => '1.03',
	162	'Class::Accessor::Fast' => '0.3',
163	'File::Slurp' => '9999.12',
164	'IO::File' => '1.1',
165	'Readonly' => '0',
166	'Tie::IxHash' => '1.21',
167	'URI' => '1.35',
168	'XML::LibXML' => '1.62',
169	},
170	version => '0.02',
171	} ],
172	'Games-Nintendo-Wii-Mii',
173	);
174
175	yaml_ok(
176	<<'END_YAML',
177	# http://module-build.sourceforge.net/META-spec.html
178	#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
179	name: Acme-Time-Baby
180	version: 2.106
181	version_from: Baby.pm
182	installdirs: site
183	requires:
184	warnings:
185
186	distribution_type: module
187	generated_by: ExtUtils::MakeMaker version 6.17
188	END_YAML
189	[ {
190	name => 'Acme-Time-Baby',
191	version => '2.106',
192	version_from => 'Baby.pm',
193	installdirs => 'site',
194	requires => {
195	warnings => undef,
196	},
197	distribution_type => 'module',
198	generated_by => 'ExtUtils::MakeMaker version 6.17',
199	} ],
200	'Acme-Time-Baby',
de044c36	201	noyamlperl => 1,
be96f5c3	202	);
	203
	204
	205
	206
	207
	208	#####################################################################
	209	# File with a YAML header
	210
	211	yaml_ok(
	212	<<'END_YAML',
be96f5c3	213	--- #YAML:1.0
	214	name: Data-Swap
	215	version: 0.05
	216	license: perl
	217	distribution_type: module
	218	requires:
	219	perl: 5.6.0
	220	dynamic_config: 0
	221	END_YAML
	222	[ {
	223	name => 'Data-Swap',
	224	version => '0.05',
	225	license => 'perl',
	226	distribution_type => 'module',
	227	requires => {
	228	perl => '5.6.0',
	229	},
	230	dynamic_config => '0',
	231	} ],
	232	'Data-Swap',
de044c36	233	nosyck => 1,
be96f5c3	234	);
	235
	236
	237
	238
	239
	240	#####################################################################
	241	# Various files that fail for unknown reasons
	242
	243	SCOPE: {
	244	my $content = load_ok(
	245	'Template-Provider-Unicode-Japanese.yml',
	246	catfile( test_data_directory(), 'Template-Provider-Unicode-Japanese.yml' ),
	247	100
	248	);
	249	yaml_ok(
	250	$content,
	251	[ {
	252	abstract => 'Decode all templates by Unicode::Japanese',
	253	author => 'Hironori Yoshida C<< <yoshida@cpan.org> >>',
	254	distribution_type => 'module',
	255	generated_by => 'Module::Install version 0.65',
	256	license => 'perl',
	257	'meta-spec' => {
	258	url => 'http://module-build.sourceforge.net/META-spec-v1.3.html',
	259	version => '1.3',
	260	},
	261	name => 'Template-Provider-Unicode-Japanese',
	262	no_index => {
	263	directory => [ qw{ inc t } ],
	264	},
	265	requires => {
	266	'Template::Config' => 0,
	267	'Unicode::Japanese' => 0,
	268	perl => '5.6.0',
	269	version => '0',
	270	},
	271	version => '1.2.1',
	272	} ],
	273	'Template-Provider-Unicode-Japanese',
de044c36	274	noyamlperl => 1,
be96f5c3	275	);
	276	}
	277
	278	SCOPE: {
	279	my $content = load_ok(
	280	'HTML-WebDAO.yml',
	281	catfile( test_data_directory(), 'HTML-WebDAO.yml' ),
	282	100
	283	);
	284	yaml_ok(
	285	$content,
	286	[ {
	287	abstract => 'Perl extension for create complex web application',
	288	author => [
	289	'Zahatski Aliaksandr, E<lt>zagap@users.sourceforge.netE<gt>',
	290	],
	291	license => 'perl',
	292	name => 'HTML-WebDAO',
	293	version => '0.04',
	294	} ],
	295	'HTML-WebDAO',
de044c36	296	nosyck => 1,
	297	);
	298	}
	299
	300	SCOPE: {
	301	my $content = load_ok(
	302	'Spreadsheet-Read.yml',
	303	catfile( test_data_directory(), 'Spreadsheet-Read.yml' ),
	304	100
	305	);
	306	yaml_ok(
	307	$content,
	308	[ {
	309	'resources' => {
	310	'license' => 'http://dev.perl.org/licenses/'
	311	},
	312	'meta-spec' => {
	313	'version' => '1.4',
	314	'url' => 'http://module-build.sourceforge.net/META-spec-v1.4.html'
	315	},
	316	'distribution_type' => 'module',
	317	'generated_by' => 'Author',
	318	'version' => 'VERSION',
	319	'name' => 'Read',
	320	'author' => [
	321	'H.Merijn Brand <h.m.brand@xs4all.nl>'
	322	],
	323	'license' => 'perl',
	324	'build_requires' => {
	325	'Test::More' => '0',
	326	'Test::Harness' => '0',
	327	'perl' => '5.006'
	328	},
	329	'provides' => {
	330	'Spreadsheet::Read' => {
	331	'version' => 'VERSION',
	332	'file' => 'Read.pm'
	333	}
	334	},
	335	'optional_features' => [
	336	{
	337	'opt_csv' => {
	338	'requires' => {
	339	'Text::CSV_XS' => '0.23'
	340	},
	341	'recommends' => {
	342	'Text::CSV_PP' => '1.10',
	343	'Text::CSV_XS' => '0.58',
	344	'Text::CSV' => '1.10'
	345	},
	346	'description' => 'Provides parsing of CSV streams'
	347	}
	348	},
	349	{
	350	'opt_excel' => {
	351	'requires' => {
	352	'Spreadsheet::ParseExcel' => '0.26',
	353	'Spreadsheet::ParseExcel::FmtDefault' => '0'
	354	},
	355	'recommends' => {
	356	'Spreadsheet::ParseExcel' => '0.42'
	357	},
	358	'description' => 'Provides parsing of Microsoft Excel files'
	359	}
360	},
361	{
362	'opt_excelx' => {
363	'requires' => {
364	'Spreadsheet::XLSX' => '0.07'
365	},
366	'description' => 'Provides parsing of Microsoft Excel 2007 files'
367	}
368	},
369	{
370	'opt_oo' => {
371	'requires' => {
372	'Spreadsheet::ReadSXC' => '0.2'
373	},
374	'description' => 'Provides parsing of OpenOffice spreadsheets'
375	}
376	},
377	{
378	'opt_tools' => {
379	'recommends' => {
380	'Tk::TableMatrix::Spreadsheet' => '0',
381	'Tk::NoteBook' => '0',
382	'Tk' => '0'
383	},
384	'description' => 'Spreadsheet tools'
385	}
386	}
387	],
388	'requires' => {
389	'perl' => '5.006',
390	'Data::Dumper' => '0',
391	'Exporter' => '0',
392	'Carp' => '0'
393	},
394	'recommends' => {
395	'perl' => '5.008005',
396	'IO::Scalar' => '0',
397	'File::Temp' => '0.14'
398	},
399	'abstract' => 'Meta-Wrapper for reading spreadsheet data'
400	} ],
401	'Spreadsheet-Read',
402	noyamlpm => 1,
403	noyamlperl => 1,
be96f5c3	404	);
be96f5c3	405	}