sub date_from_to_html {
my $name = shift || return;
return qq{
- <input type="text" name="${name}_day_from" size="2">
- <input type="text" name="${name}_month_from" size="2">
<input type="text" name="${name}_year_from" size="4">
+ <input type="text" name="${name}_month_from" size="2">
+ <input type="text" name="${name}_day_from" size="2">
-
- <input type="text" name="${name}_day_to" size="2">
- <input type="text" name="${name}_month_to" size="2">
<input type="text" name="${name}_year_to" size="4">
+ <input type="text" name="${name}_month_to" size="2">
+ <input type="text" name="${name}_day_to" size="2">
};
}
on share
<select name="search_share">$hosts_html</select>
+ show
+ <select name="burned">
+ <option value="">all</a>
+ <option value="burned">burned</a>
+ <option value="pending">pending</a>
+ </select>
+ files
<input type="submit" value="Search">
</p>
(yyyy-mm-dd)
</p>
+<p style="color: gray;">
+ <input type="checkbox" name="use_hest"> use faster full-text search engine
+</p>
+
<input type="hidden" value="search" name="action">
<input type="hidden" value="results" name="search_results">
</form>
if ( !defined($In{search_results}) ) {
$html .= eval(q{ ${h2("Search criteria")}});
+
$html .= $form;
} else {
$html .= eval(q{ ${h2("Search results")}});
+
my $fif = new HTML::FillInForm;
$html .= $fif->fill(scalarref => \$form, fdat => \%In);
- my ($where, $from_f, $to_f, $from_b, $to_b) = BackupPC::SearchLib::getWhere(\%In);
-
- my $q = $In{'search_filename'};
-
- # DEBUG
- #$html .= "<small>";
- #$html .= "Filename filter: $q</br>" if ($q);
- #$html .= "Files date limit: $from_f - $to_f</br>" if ($from_f || $to_f);
- #$html .= "Backup date limit: $from_b - $to_b</br>" if ($from_b || $to_b);
- #$html .= "</small>";
-
- $html .= BackupPC::SearchLib::displayGrid( $where, 1, $In{'offset'}, $q);
+ $html .= BackupPC::SearchLib::displayGrid( \%In );
}
Header( eval("qq{$Lang->{Search_archive}}"), "", 1, "", $html );