| blob | 8fcb33485c3cfecef33b9cdd529f73301cbd84f2 |
1 use strict;
2 use warnings;
4 use SGN::Test qw/validate_urls/;
5 use Test::More;
7 my %urls = (
8 "homepage" => "/",
9 "cview index page" => "/cview/index.pl",
10 "map overview F2-2000" => "/cview/map.pl?map_id=9",
11 "comparative mapviewer" => "/cview/view_chromosome.pl?map_version_id=39",
12 "map overview FISH map" => "/cview/map.pl?map_id=13",
13 "physical map overview" => "/cview/map.pl?map_id=p9",
14 "agp map overview" => "/cview/map.pl?map_id=agp",
15 "gene search" => "/search/locus_search.pl?w8e4_any_name_matchtype=contains&w8e4_any_name=dwarf&w8e4_common_name=&w8e4_phenotype=&w8e4_locus_linkage_group=&w8e4_ontology_term=&w8e4_editor=&w8e4_genbank_accession=",
16 "locus detail" => "/phenome/locus_display.pl?locus_id=428",
17 "phenotype search" => "/search/phenotype_search.pl?wee9_phenotype=&wee9_individual_name=&wee9_population_name=",
18 "phenotype individual detail" => "/phenome/individual.pl?individual_id=7530",
19 "phenotype population detail" => "/phenome/population.pl?population_id=12",
20 "QTL detail page" => "/phenome/qtl.pl?population_id=12&term_id=47515&chr=7&l_marker=SSR286&p_marker=SSR286&r_marker=CD57&lod=3.9&qtl=/documents/tempfiles/temp_images/1a1a5391641c653884fbc9d6d8be5c90.png",
21 "Load QTL page" => "/cgi-bin/phenome/qtl_load.pl",
22 'tomato bac tpf' => '/sequencing/agp.pl',
23 'tomato bac tpf' => '/sequencing/tpf.pl',
24 "QTL individuals list page" => "/phenome/indls_range_cvterm.pl?cvterm_id=47515&lower=151.762&upper=162.011&population_id=12",
25 "qtl/traits search" => "/search/direct_search.pl?search=cvterm_name",
26 "unigene search" => "/search/ug-ad2.pl?w9e3_page=0&w9e3_sequence_name=SGN-U231977&w9e3_clone_name=&w9e3_membersrange=gt&w9e3_members1=&w9e3_members2=&w9e3_annotation=&w9e3_annot_type=blast&w9e3_lenrange=gt&w9e3_len1=&w9e3_len2=&w9e3_unigene_build_id=any",
27 "unigene detail" => "/search/unigene.pl?unigene_id=SGN-U231977&w9e3_page=0&w9e3_annot_type=blast&w9e3_unigene_build_id=any",
28 "unigene build" => "/search/unigene_build.pl?id=46",
29 'unigene standalone six-frame translation' => '/tools/sixframe_translate.pl?unigene_id=573435',
30 "marker search page" => "/search/direct_search.pl?search=markers",
31 "marker search" => "/search/markers/markersearch.pl?w822_nametype=starts+with&w822_marker_name=&w822_mapped=on&w822_species=Any&w822_protos=Any&w822_colls=Any&w822_chromos=Any&w822_pos_start=&w822_pos_end=&w822_confs=-1&w822_maps=Any&w822_submit=Search",
32 "marker detail rflp" => "/search/markers/markerinfo.pl?marker_id=109",
33 "marker view rflp" => "/search/markers/view_rflp.pl?marker_id=538",
34 "marker detail ssr" => "/search/markers/markerinfo.pl?marker_id=1151",
35 "marker detail caps" => "/search/markers/markerinfo.pl?marker_id=6469",
36 "bac search page" => "/search/direct_search.pl?search=bacs",
37 "bac search" => "/maps/physical/clone_search.pl?w98e_page=0&w98e_id=&w98e_seqstatus=&w98e_estlenrange=gt&w98e_estlen1=&w98e_estlen2=&w98e_genbank_accession=&w98e_chromonum=&w98e_end_annotation=&w98e_map_id=&w98e_offsetrange=gt&w98e_offset1=&w98e_offset2=&w98e_linkage_group_name=&w98e_il_project_id=&w98e_il_bin_name=",
38 "bac detail page" => "/maps/physical/clone_info.pl?id=3468&w98e_page=0&w98e_seqstatus=complete",
39 "bac detail page 2" => "/maps/physical/clone_info.pl?id=119416",
40 "est search page" => "/search/direct_search.pl?search=est",
41 "est search" => "/search/est.pl?request_from=0&request_id=SGN-E234234&request_type=7&search=Search",
42 "est detail page" => "/search/est.pl?request_from=0&request_id=SGN-E234234&request_type=7&search=Search",
43 'chado cvterm page' => '/chado/cvterm.pl?cvterm_id=47499',
44 'sol100 page' => '/sequencing/sol100.pl',
45 "family search page" => "/search/direct_search.pl?search=family",
46 "family search" => "/search/family_search.pl?wa82_family_id=22081",
47 "family detail page" => "/search/family.pl?family_id=22081",
48 "library search page" => "/search/direct_search.pl?search=library",
49 "library search" => "/search/library_search.pl?w5c4_term=leaf",
50 "library detail page" => "/content/library_info.pl?library=MXLF",
51 "people search page" => "/search/direct_search.pl?search=directory",
52 "people search" => "/solpeople/people_search.pl?wf7d_first_name=&wf7d_last_name=&wf7d_organization=&wf7d_country=USA&wf7d_research_interests=&wf7d_research_keywords=&wf7d_sortby=last_name",
53 "people detail page" => "/solpeople/personal-info.pl?sp_person_id=208&action=view",
54 "tomato genome data home" => "/genomes/Solanum_lycopersicum/genome_data.pl",
55 "genome browser bac list" => "/genomes/Solanum_lycopersicum/genome_data.pl?chr=2",
56 # "Gbrowse example" => "/gbrowse/gbrowse/tomato_bacs/?name=C02HBa0016A12.1",
57 "BLAST page" => "/tools/blast/",
58 "Tree Browser input page" => "/tools/tree_browser/",
59 "Tree Browser sample tree" => "/tools/tree_browser/?tree_string=%281%3A0%2E020058%2C%28%28%28%28%28%282%3A0%2E051985%2C6%3A0%2E002761%29%3A0%2E027131%2C11%3A0%2E405224%29%3A0%2E042208%2C15%3A0%2E067923%29%3A0%2E046508%2C%288%3A1%2E655e%2D08%2C10%3A0%2E155643%29%3A0%2E083277%29%3A0%2E096957%2C9%3A0%2E119609%29%3A0%2E124781%2C%28%283%3A0%2E066341%2C%28%28%284%3A0%2E013384%2C7%3A0%2E007637%29%3A0%2E019214%2C%2016%3A0%2E085744%29%3A0%2E020811%2C12%3A0%2E025839%29%3A0%2E168755%29%3A0%2E086288%2C13%3A0%2E170910%29%3A0%2E016660%29%3A0%2E027472%2C%285%3A0%2E005652%2C14%3A0%2E043026%29%3A0%2E014920%29%3B",
60 "insitu db" => "/insitu/",
61 "insitu search page" => "/insitu/search.pl",
62 "insitu search" => "/insitu/search.pl?w773_experiment_name=&w773_exp_tissue=&w773_exp_stage=&w773_exp_description=&w773_probe_name=&w773_probe_identifier=&w773_image_name=&w773_image_description=&w773_person_first_name=&w773_person_last_name=&w773_organism_name=&w773_common_name=#",
63 "insitu detail page" => "/insitu/detail/experiment.pl?experiment_id=89&action=view",
64 "alignment viewer input page" => "/tools/align_viewer/",
65 "gem search page for templates" => "/search/direct_search.pl?search=template",
66 "gem search page for experiments" => "/search/direct_search.pl?search=experiment",
67 "gem search page for platforms" => "/search/direct_search.pl?search=platform",
68 "gem results page for templates" => "/search/gem_template_search.pl?w616_template_parameters=AB",
69 "gem results page for experiments" => "/search/gem_experiment_search.pl?w932_experiment_parameters=leaf",
70 "gem results page for platforms" => "/search/gem_platform_search.pl?w4b9_template_parameters=affy",
71 "gem detail page for template" => "/gem/template.pl?id=65",
72 "gem detail page for platform" => "/gem/platform.pl?id=1",
73 "gem detail page for experimental design" => "/gem/experimental_design.pl?id=1",
74 "gem detail page for experiment" => "/gem/experiment.pl?id=1",
75 "gem detail page for target" => "/gem/target.pl?id=49",
76 "biosource detail page for sample" => "/biosource/sample.pl?id=1",
77 "Locus ajax form" => "/jsforms/locus_ajax_form.pl",
78 "Locus editors" => "/phenome/editors_note.pl",
79 "SGN data overview" => "/content/sgn_data.pl",
80 "tomato genome publication page" => "/genomes/Solanum_lycopersicum/publications.pl",
81 "tomato genome index page" => "/genomes/Solanum_lycopersicum/",
82 "outreach index" => "/outreach/",
83 );
85 my $iteration_count;
87 plan( tests => scalar(keys %urls)*3*($iteration_count = $ENV{ITERATIONS} || 1));
89 validate_urls(\%urls, $iteration_count);