open Types
open Common
open Printf
open Config_file
open Parser_helper
open Tree
type state = {
per_files : (string, per_file) Hashtbl.t ;
per_packages : (string, per_package) Hashtbl.t ;
methods : (string, (pos * variable_used ref * prototype option) list) Hashtbl.t ;
global_vars_used : ((context * string * string) * pos) list ref ;
packages_being_classes : (string, unit) Hashtbl.t ;
}
type vars = {
my_vars : ((context * string) * (pos * variable_used ref * prototype option)) list list ;
our_vars : ((context * string) * (pos * variable_used ref * prototype option)) list list ;
locally_imported : ((context * string) * (string * variable_used ref * prototype option)) list ;
required_vars : (context * string * string) list ;
current_package : per_package ;
is_toplevel : bool ;
write_only : bool ;
state : state ;
}
let rec get_imported state current_package (package_name, (imports, pos)) =
try
let package_used = Hashtbl.find state.per_packages package_name in
let exports = package_used.exports in
let get_var_by_name var =
let (b, prototype) =
try sndter3 (Hashtbl.find package_used.vars_declared var)
with Not_found ->
try
sndter3 (List.assoc var (get_imports state package_used))
with Not_found ->
warn_with_pos pos (sprintf "name %s is not defined in package %s" (variable2s var) package_name) ;
ref Access_various, None
in
var, (package_name, b, prototype)
in
match imports with
| None ->
let re = match exports.special_export with
| Some Re_export_all -> get_imports state package_used
| Some Fake_export_all ->
(* HACK: if package exporting-all is ignored, ignore package importing *)
if List.mem package_name !ignored_packages then Tree.ignore_package current_package.package_name;
Hashtbl.fold (fun var (_pos, b, proto) l -> (var, (package_name, b, proto)) :: l) package_used.vars_declared []
| _ -> [] in
let l = List.map get_var_by_name exports.export_auto in
re @ l
| Some l ->
let imports_vars =
collect (function
| I_raw, tag ->
(try
List.assoc tag exports.export_tags
with Not_found -> warn_with_pos pos (sprintf "package %s doesn't export tag %s" package_name tag) ; [])
| variable ->
if List.mem variable exports.export_ok || List.mem variable exports.export_auto then
[ variable ]
else
(warn_with_pos pos (sprintf "package %s doesn't export %s" package_name (variable2s variable)) ; [])
) l
in
List.map get_var_by_name imports_vars
with Not_found -> []
and get_imports state package =
match !(package.imported) with
| Some l -> l
| None ->
let l = collect (get_imported state package) package.uses in
package.imported := Some l ;
l
let do_para_comply_with_prototype para proto =
match proto with
| Some proto ->
(match para with
| [List [List paras]]
| [List paras] ->
if List.exists is_not_a_scalar paras then 0 else
let len = List.length paras in
if len < proto.proto_nb_min then -1
else (match proto.proto_nb_max with
| Some max -> if len > max then 1 else 0
| None -> 0)
| _ -> 0)
| _ -> 0
let check_para_comply_with_prototype para proto =
match para with
| None -> ()
| Some(pos, para) ->
match do_para_comply_with_prototype para proto with
| -1 -> warn_with_pos pos "not enough parameters"
| 1 -> warn_with_pos pos "too many parameters"
| _ -> ()
let is_anonymous_variable_name s = String.length s > 1 && s.[0] = '_'
let variable_used write_only used =
if !used != Access_various then
used := if write_only then Access_write_only else Access_various
let is_my_declared vars t =
List.exists (fun l ->
List.mem_assoc t l && (variable_used vars.write_only (snd3 (List.assoc t l)) ; true)
) vars.my_vars
let is_our_declared vars t =
List.exists (fun l ->
List.mem_assoc t l && (variable_used vars.write_only (snd3 (List.assoc t l)) ; true)
) vars.our_vars
let is_var_declared_raw write_only state package var para =
match
try
let _, used, proto = Hashtbl.find package.vars_declared var in
Some(used, proto)
with Not_found -> try
let _, used, proto = List.assoc var (get_imports state package) in
Some(used, proto)
with Not_found ->
None
with
| Some (used, proto) ->
check_para_comply_with_prototype para proto ;
variable_used write_only used ;
true
| None ->
false
let is_var_declared vars var para =
List.mem_assoc var vars.locally_imported ||
is_var_declared_raw vars.write_only vars.state vars.current_package var para
let is_global_var_declared vars (context, fq, name) para =
try
let package = Hashtbl.find vars.state.per_packages fq in
is_var_declared_raw vars.write_only vars.state package (context, name) para
with Not_found -> false
let is_global_var context ident =
match context with
| I_scalar ->
(match ident with
| "@" | "!" | ">" | "\\" | "$" | "^A" | "'" | "/" | "?" | "<" | "^W" | "|" | "^I" | "&" | "."
| "0" | "1" | "2" | "3" | "4" | "5" | "6" | "7" | "8" | "9" -> true
| _ -> false)
| I_array ->
(match ident with
| "ARGV" | "INC" -> true
| _ -> false)
| I_hash ->
(match ident with
| "ENV" | "SIG" -> true
| _ -> false)
| I_star ->
(match ident with
| "STDIN" | "STDOUT" | "STDERR"
| "__FILE__" | "__LINE__" | "undef" -> true
| _ -> false)
| I_func ->
(match ident with
| "-b" | "-c" | "-d" | "-e" | "-f" | "-l" | "-r" | "-s" | "-w" | "-x"
| "abs" | "alarm" | "atan2" | "bless"
| "caller" | "chdir" | "chmod" | "chomp" | "chop" | "chown" | "chr" | "chroot" | "close" | "closedir" | "cos" | "crypt"
| "defined" | "delete" | "die"
| "each" | "endpwent" | "eof" | "eval" | "exec" | "exists" | "exit"
| "fcntl" | "fileno" | "flock" | "formline" | "fork"
| "gethostbyaddr" | "gethostbyname" | "getgrent" | "getgrnam" | "getgrgid" | "getppid" | "getpwent" | "getpwnam" | "getpwuid" | "glob" | "gmtime" | "goto" | "grep" | "hex"
| "index" | "int" | "ioctl" | "join" | "keys" | "kill"
| "last" | "lc" | "lcfirst" | "length" | "link" | "localtime" | "log" | "lstat"
| "map" | "mkdir" | "next" | "no" | "oct" | "open" | "opendir" | "ord"
| "pack" | "pipe" | "pop" | "print" | "printf" | "push" | "quotemeta"
| "rand" | "read" | "readdir" | "readlink" | "redo" | "ref" | "rename" | "require" | "return" | "reverse" | "rindex" | "rmdir"
| "scalar" | "seek" | "select" | "setpwent" | "shift" | "sin" | "sleep" | "sort" | "splice" | "split" | "sprintf" | "sqrt" | "stat" | "substr"
| "symlink" | "syscall" | "sysopen" | "sysread" | "sysseek" | "system" | "syswrite" | "tie" | "time"
| "uc" | "ucfirst" | "umask" | "undef" | "unlink" | "unpack" | "unshift" | "utime" | "values" | "vec" | "wait" | "waitpid" | "wantarray" | "warn" | "write"
-> true
| _ -> false)
| _ -> false
let check_variable (context, var) vars para =
match var with
| Ident(_, s, pos) when context <> I_func && is_anonymous_variable_name s && s <> "__FILE__" && s <> "__LINE__" ->
warn_with_pos pos (sprintf "variable %s must not be used\n (variable with name _XXX are reserved for unused variables)" (variable2s(context, string_of_Ident var)))
| Ident(Some pkg, _, _) when uses_external_package pkg || List.mem pkg !ignored_packages -> ()
| Ident(None, ident, pos) ->
if is_my_declared vars (context, ident) || is_our_declared vars (context, ident) || is_var_declared vars (context, ident) para || is_global_var context ident
then ()
else warn_with_pos pos (if context = I_func then "unknown function " ^ ident else "undeclared variable " ^ variable2s(context, ident))
| Ident(Some fq, name, pos) ->
if (fq = "CORE") && is_global_var context name || is_global_var_declared vars (context, fq, name) para
then ()
else
if context = I_func then
warn_with_pos pos ("unknown function " ^ string_of_Ident var)
else
lpush vars.state.global_vars_used ((context, fq, name), pos)
| _ -> ()
let declare_My vars (mys, pos) =
let l_new = List.filter (fun (context, ident) ->
if context = I_raw then
if ident = "undef" then false else die_with_pos pos (sprintf "bad ident %s in my" ident)
else true
) mys in
let l_pre = List.hd vars.my_vars in
List.iter (fun v ->
if List.mem_assoc v l_pre then warn_with_pos pos (sprintf "redeclared variable %s" (variable2s v))
) l_new ;
{ vars with my_vars = (List.map (fun v -> v, (pos, ref Access_none, None)) l_new @ l_pre) :: List.tl vars.my_vars }
let declare_Our vars (ours, pos) =
match vars.our_vars with
| [] -> vars (* we're at the toplevel, already declared in vars_declared *)
| l_pre :: other ->
List.iter (fun v ->
if List.mem_assoc v l_pre && v <> (I_scalar, "_") then warn_with_pos pos (sprintf "redeclared variable %s" (variable2s v))
) ours ;
{ vars with our_vars = (List.map (fun v -> v, (pos, ref Access_none, None)) ours @ l_pre) :: other }
let declare_My_our vars (my_or_our, l, pos) =
match my_or_our with
| "my" -> declare_My vars (l, pos)
| "local"
| "our" -> declare_Our vars (l, pos)
| _ -> internal_error "declare_My_our"
let un_parenthesize_one_elt_List = function
| [List l] -> l
| l -> l
let check_unused_local_variables vars =
List.iter (fun ((context, s as v), (pos, used, _proto)) ->
if !used != Access_various then
match s with
| "BEGIN" | "END" | "DESTROY" -> ()
| "_" when context = I_array ->
warn_with_pos pos "if the function doesn't take any parameters, please use the empty prototype.\nexample \"sub foo() { ... }\""
| _ ->
if s.[0] != '_' || s = "_" then
let msg = if !used = Access_write_only then sprintf "variable %s assigned, but not read" else sprintf "unused variable %s" in
warn_with_pos pos (msg (variable2s v))
) (List.hd vars.my_vars)
let check_variables vars t =
let rec check_variables_ vars t = fold_tree check vars t
and check vars = function
| Block l ->
let vars' = { vars with my_vars = [] :: vars.my_vars ; our_vars = [] :: vars.our_vars } in
let vars' = List.fold_left check_variables_ vars' l in
check_unused_local_variables vars' ;
Some vars
| Call(Deref(I_func, Ident(None, "sort", _)), (Anonymous_sub(_, Block f, pos) :: l)) ->
let vars = List.fold_left check_variables_ vars l in
let vars' = { vars with my_vars = [ (I_scalar, "a"), (pos, ref Access_various, None) ; (I_scalar, "b"), (pos, ref Access_various, None) ] :: vars.my_vars ; our_vars = [] :: vars.our_vars } in
let vars' = List.fold_left check_variables_ vars' f in
check_unused_local_variables vars' ;
Some vars
| Call(Deref(I_func, Ident(None, func, func_pos)), Anonymous_sub(_, Block f, pos) :: l)
when List.mem func [ "grep" ; "map" ; "substInFile" ; "map_index" ; "each_index" ; "partition" ; "find_index" ; "grep_index" ; "find" ; "any" ; "every" ] ->
let vars = List.fold_left check_variables_ vars l in
let vars' = { vars with my_vars = [] :: vars.my_vars ; our_vars = [(I_scalar, "_"), (pos, ref Access_various, None)] :: vars.our_vars } in
let vars' = List.fold_left check_variables_ vars' f in
check_unused_local_variables vars' ;
check_variable (I_func, Ident(None, func, func_pos)) vars None ;
Some vars
| Call(Deref(I_func, (Ident _ as ident)), [ Deref(I_star, (Ident(None, "_", _))) ]) ->
(* the &f case: allow access to @_ *)
check_variable (I_func, ident) vars None ;
let _ = is_my_declared vars (I_array, "_") in
Some vars
| Call(Deref(I_func, (Ident _ as ident)), [ List [ Deref(I_array, (Ident(None, "_", pos))) ] ]) ->
(* special warning if @_ is unbound *)
check_variable (I_func, ident) vars None ;
if not (is_my_declared vars (I_array, "_")) then
warn_with_pos pos (sprintf "replace %s(@_) with &%s" (string_of_Ident ident) (string_of_Ident ident)) ;
Some vars
| Call(Deref(I_func, Ident(None, "require", _)), [Ident _]) -> Some vars
| Call(Deref(I_func, Ident(None, "shift", pos)) as var, [])
| Call(Deref(I_func, Ident(None, "pop", pos)) as var, []) ->
check vars (Call(var, [ Deref(I_array, Ident(None, (if vars.is_toplevel then "ARGV" else "_"), pos)) ]))
| Call(Deref(context, (Ident(_, _, pos) as var)), para) ->
check_variable (context, var) vars (Some(pos, para)) ;
let vars = List.fold_left check_variables_ vars para in
Some vars
(* | Call_op("=", -> List.fold_left (fold_tree f) env l*)
| Call_op("while infix", [ expr ; (List [ Call_op("<>", _, _) ] as l) ], pos)
| Call_op("for infix", [ expr ; l ], pos) ->
let vars = check_variables_ vars l in
let vars' = { vars with my_vars = [] :: vars.my_vars ; our_vars = [(I_scalar, "_"), (pos, ref Access_various, None)] :: vars.our_vars } in
let vars' = check_variables_ vars' expr in
if List.hd(vars'.my_vars) <> [] then warn_with_pos pos "you can't declare variables in foreach infix";
Some vars
| Call_op("foreach my", [my; expr; Block block], _) ->
let vars = check_variables_ vars expr in
let vars = check_variables_ vars (Block (my :: block)) in
Some vars
| Call_op(op, l, _) when op = "if" || op = "while" || op = "unless" || op = "until" ->
let vars' = { vars with my_vars = [] :: vars.my_vars ; our_vars = [] :: vars.our_vars } in
let vars' = List.fold_left check_variables_ vars' l in
check_unused_local_variables vars' ;
Some vars
| Sub_declaration(Ident(fq, name, pos) as ident, perl_proto, Block body, kind) ->
let vars = declare_Our vars ([ I_func, string_of_Ident ident ], pos) in
let my_vars, l =
match has_proto perl_proto (Block body) with
| Some(mys, mys_pos, body) ->
[], My_our ("my", mys, mys_pos) :: body
| _ ->
let dont_check_use =
kind = Glob_assign ||
fq = None && List.mem name ["DESTROY"] ||
Hashtbl.mem vars.state.packages_being_classes (some_or fq vars.current_package.package_name)
in
[(I_array, "_"), (pos, ref (if dont_check_use then Access_various else Access_none), None)], body
in
let local_vars =
if fq = None && name = "AUTOLOAD"
then [ (I_scalar, "AUTOLOAD"), (pos, ref Access_various, None) ]
else [] in
let vars' = { vars with my_vars = my_vars :: vars.my_vars ; our_vars = local_vars :: vars.our_vars ; is_toplevel = false } in
let vars' = List.fold_left check_variables_ vars' l in
check_unused_local_variables vars' ;
Some vars
| Anonymous_sub(_, Block l, pos) ->
let vars' = { vars with my_vars = [(I_array, "_"), (pos, ref Access_various, None)] :: vars.my_vars ; is_toplevel = false } in
let vars' = List.fold_left check_variables_ vars' l in
check_unused_local_variables vars' ;
Some vars
| Call_op("foreach", [ expr ; Block l ], pos) ->
let vars = check_variables_ vars expr in
let vars' = { vars with my_vars = [] :: vars.my_vars ; our_vars = [(I_scalar, "_"), (pos, ref Access_various, None)] :: vars.our_vars } in
let vars' = List.fold_left check_variables_ vars' l in
check_unused_local_variables vars' ;
Some vars
| Anonymous_sub _
| Sub_declaration _ -> internal_error "check_variables"
| Ident _ as var ->
check_variable (I_star, var) vars None ;
Some vars
| My_our(my_or_our, mys, pos) -> Some(declare_My_our vars (my_or_our, mys, pos))
| Deref(context, (Ident _ as var)) ->
check_variable (context, var) vars None ;
Some vars
| Deref_with(context, _, (Ident _ as var), para) ->
let vars = check_variables_ vars para in
check_variable (context, var) vars None ;
Some vars
| Call_op("=", [My_our(my_or_our, mys, pos); e], _) ->
(* check e first *)
let vars = check_variables_ vars e in
List.iter (fun (context, var) ->
if non_scalar_context context then warn_with_pos pos (sprintf "%s takes all the arguments, %s is undef in any case" (variable2s (context, var)) (variable2s (last mys)))
) (removelast mys) ; (* mys is never empty *)
Some(declare_My_our vars (my_or_our, mys, pos))
| Call_op("if infix", [List [My_our _]; List [Num("0", _)]], _) -> None (* special allowed case *)
| Call_op(op, List (My_our _ :: _) :: _, pos)
| Call_op(op, My_our _ :: _, pos)
| Call_op(op, Call_op("local", _, _) :: _, pos) ->
if op <> "=" then warn_with_pos pos (sprintf "applying %s on a new initialized variable is wrong" op);
None
| Call_op("=", [ Deref(context, (Ident _ as var)) ; para], _) ->
check_variable (context, var) { vars with write_only = true } None ;
Some (check_variables_ vars para)
| Call_op("=", [ List [ List l ] ; para], _) ->
let vars = List.fold_left (fun vars -> function
| Deref(context, (Ident _ as var)) ->
check_variable (context, var) { vars with write_only = true } None ;
vars
| e -> check_variables_ vars e
) vars l in
let vars = check_variables_ vars para in
Some vars
| Method_call(Raw_string(package_name, pos), Raw_string ("import", _), para) ->
let args =
match para with
| [] -> None
| [ List [v] ] -> Some(from_qw v)
| _ -> die_with_pos pos "bad import statement" in
let l = get_imported vars.state vars.current_package (package_name, (args, pos)) in
let vars =
if vars.is_toplevel then (
vars.current_package.imported := Some (get_imports vars.state vars.current_package @ l) ;
vars
) else
{ vars with locally_imported = l @ vars.locally_imported } in
Some vars
| Method_call(Raw_string(pkg, _) as class_, Raw_string(method_, pos), para) ->
let vars = List.fold_left check_variables_ vars para in
let rec search pkg =
if is_global_var_declared vars (I_func, pkg, method_) (Some(pos, [ List (class_ :: un_parenthesize_one_elt_List para) ])) then true
else
let package = Hashtbl.find vars.state.per_packages pkg in
List.exists search (List.map fst (some_or package.isa []))
in
(try
if not (uses_external_package pkg || List.mem pkg !ignored_packages || search pkg || method_ = "bootstrap") then
warn_with_pos pos (sprintf "unknown method %s starting in package %s" method_ pkg);
with Not_found -> warn_with_pos pos (sprintf "unknown package %s" pkg));
Some vars
| Method_call(o, Raw_string(method_, pos), para) ->
let vars = check_variables_ vars o in
let vars = List.fold_left check_variables_ vars para in
(try
let l = Hashtbl.find vars.state.methods method_ in
let l_and = List.map (fun (_, used, proto) -> used, do_para_comply_with_prototype [ List (o :: un_parenthesize_one_elt_List para) ] proto) l in
let l_and =
match List.filter (fun (_, n) -> n = 0) l_and with
| [] ->
(match uniq (List.map snd l_and) with
| [-1] -> warn_with_pos pos "not enough parameters"
| [ 1] -> warn_with_pos pos "too many parameters"
| _ -> warn_with_pos pos "not enough or too many parameters") ;
l_and
| l -> l
in
List.iter (fun (used, _) -> used := Access_various) l_and
with Not_found ->
if not (List.mem method_ [ "isa"; "can" ]) then
warn_with_pos pos ("unknown method " ^ method_)) ;
Some vars
| _ -> None
in
let vars = List.fold_left check_variables_ { vars with my_vars = [[]] } t in
vars
let check_tree state package =
let vars = { my_vars = [[]]; our_vars = []; locally_imported = []; required_vars = []; current_package = package; state = state; is_toplevel = true; write_only = false } in
if !Flags.verbose then print_endline_flush_always ("checking package " ^ package.package_name) ;
let vars = check_variables vars package.body in
check_unused_local_variables vars ;
()
let imported_add i1 i2 = if i1 = None && i2 = None then None else Some (some_or i1 [] @ some_or i2 [])
let add_package_to_state state package =
let package =
try
let existing_package = Hashtbl.find state.per_packages package.package_name in
(*print_endline_flush (existing_package.file_name ^ " vs " ^ package.file_name); *)
let vars_declared = existing_package.vars_declared in
Hashtbl.iter (fun var pos -> Hashtbl.replace vars_declared var pos) package.vars_declared ;
let p = {
package_name = package.package_name ; has_package_name = package.has_package_name ;
isa = if existing_package.isa = None then package.isa else existing_package.isa ;
body = existing_package.body @ package.body ;
uses = existing_package.uses @ package.uses ;
required_packages = existing_package.required_packages @ package.required_packages ;
vars_declared = vars_declared ;
imported = ref (imported_add !(existing_package.imported) !(package.imported)) ;
exports = { export_ok = existing_package.exports.export_ok @ package.exports.export_ok ;
export_auto = existing_package.exports.export_auto @ package.exports.export_auto ;
export_tags = existing_package.exports.export_tags @ package.exports.export_tags ;
special_export = None }
} in
Hashtbl.replace state.per_packages package.package_name p ;
p
with Not_found -> package
in
Hashtbl.replace state.per_packages package.package_name package
let add_file_to_files per_files file =
Hashtbl.replace per_files file.file_name file
let check_unused_vars package =
Hashtbl.iter (fun (context, name) (pos, is_used, _proto) ->
if not (!is_used != Access_various || List.mem name ["BEGIN"; "END"; "DESTROY"; "ISA"; "AUTOLOAD"; "EXPORT"; "EXPORT_OK"; "EXPORT_TAGS"]) then
warn_with_pos pos (sprintf "unused %s%s::%s" (if context = I_func then "function " else "variable " ^ context2s context) package.package_name name)
) package.vars_declared
let arrange_global_vars_declared global_vars_declared state =
Hashtbl.iter (fun (context, fq, name) (pos, proto) ->
let package =
try
Hashtbl.find state.per_packages fq
with Not_found ->
(* creating a new shadow package *)
let package =
{
package_name = fq;
has_package_name = true ;
exports = empty_exports ;
imported = ref None ;
vars_declared = Hashtbl.create 16 ;
uses = [] ;
required_packages = [] ;
body = [] ;
isa = None ;
} in
Hashtbl.add state.per_packages fq package ;
package
in
if not (Hashtbl.mem package.vars_declared (context, name)) then
Hashtbl.add package.vars_declared (context, name) (pos, ref Access_none, proto)
(* otherwise dropping this second declaration *)
) global_vars_declared ;
state
let get_methods_available state =
let classes = uniq (
hashtbl_collect (fun _ package ->
match package.isa with
| None ->
if Hashtbl.mem package.vars_declared (I_func, "new") then [package] else []
| Some l ->
package :: List.map (fun (pkg, pos) ->
try
Hashtbl.find state.per_packages pkg
with Not_found -> die_with_pos pos ("bad package " ^ pkg)
) l
) state.per_packages
) in
List.iter (fun pkg ->
Hashtbl.replace state.packages_being_classes pkg.package_name () ;
Hashtbl.iter (fun (context, v) (pos, is_used, proto) ->
if context = I_func then
let l = try Hashtbl.find state.methods v with Not_found -> [] in
Hashtbl.replace state.methods v ((pos, is_used, proto) :: l)
) pkg.vars_declared
) classes ;
state
let default_per_files() = Hashtbl.create 16
let default_state per_files = { per_files = per_files; per_packages = Hashtbl.create 16; methods = Hashtbl.create 256 ; global_vars_used = ref []; packages_being_classes = Hashtbl.create 16 }
let cache_cache = Hashtbl.create 16
let pkgs2s prefix l =
let l = List.sort compare (List.map (fun pkg -> pkg.file_name) l) in
String.concat "" (List.map (fun s -> prefix ^ s ^ "\n") l)
let read_packages_from_cache per_files dir =
if !Flags.no_cache || Hashtbl.mem cache_cache dir then () else
try
Hashtbl.add cache_cache dir ();
let file = dir ^ "/.perl_checker.cache" in
let fh = open_in file in
let magic = input_line fh in
if magic <> "perl_checker cache " ^ string_of_int Build.date then () else
let l = Marshal.from_channel fh in
close_in fh ;
let l = List.filter (fun file ->
not (Hashtbl.mem per_files file.file_name) &&
(try file.build_time > mtime file.file_name with _ -> false)
) l in
if !Flags.verbose then print_endline_flush (sprintf "using cached files\n%sfrom %s" (pkgs2s " " l) file) ;
List.iter (fun file ->
Info.add_a_file file.file_name file.lines_starts ;
add_file_to_files per_files file
) l
with Sys_error _ | End_of_file -> ()
let write_packages_cache per_files dir =
try
let l = List.filter (fun per_file -> per_file.require_name <> None) (hashtbl_values per_files) in
let file = dir ^ "/.perl_checker.cache" in
let fh = open_out file in
output_string fh ("perl_checker cache " ^ string_of_int Build.date ^ "\n") ;
Marshal.to_channel fh l [] ;
close_out fh ;
if !Flags.verbose then print_endline_flush (sprintf "saving cached files\n%sin %s" (pkgs2s " " l) file)
with Sys_error _ -> ()
n546' href='#n546'>546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
1023
1024
1025
1026
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052
1053
1054
1055
1056
1057
1058
1059
1060
1061
1062
1063
1064
1065
1066
1067
1068
1069
1070
1071
1072
1073
1074
1075
1076
1077
1078
1079
1080
1081
1082
1083
1084
1085
1086
1087
1088
1089
1090
1091
1092
1093
1094
1095
1096
1097
1098
1099
1100
1101
1102
1103
1104
1105
1106
1107
1108
1109
1110
1111
1112
1113
1114
1115
1116
1117
1118
1119
1120
1121
1122
1123
1124
1125
1126
1127
1128
1129
1130
1131
1132
1133
1134
1135
1136
1137
1138
1139
1140
1141
1142
1143
1144
1145
1146
1147
1148
1149
1150
1151
1152
1153
1154
1155
1156
1157
1158
1159
1160
1161
1162
1163
1164
1165
1166
1167
1168
1169
1170
1171
1172
1173
1174
1175
1176
1177
1178
1179
1180
1181
1182
1183
1184
1185
1186
1187
1188
1189
1190
1191
1192
1193
1194
1195
1196
1197
1198
1199
1200
1201
1202
1203
1204
1205
1206
1207
1208
1209
1210
1211
1212
1213
1214
1215
1216
1217
1218
1219
1220
1221
1222
1223
1224
1225
1226
1227
1228
1229
1230
1231
1232
1233
1234
1235
1236
1237
1238
1239
1240
1241
1242
1243
1244
1245
1246
1247
1248
1249
1250
1251
1252
1253
1254
1255
1256
1257
1258
1259
1260
1261
1262
1263
1264
1265
1266
1267
1268
1269
1270
1271
1272
1273
1274
1275
1276
1277
1278
1279
1280
1281
1282
1283
1284
1285
1286
1287
1288
1289
1290
1291
1292
1293
1294
1295
1296
1297
1298
1299
1300
1301
1302
1303
1304
1305
1306
1307
1308
1309
1310
1311
1312
1313
1314
1315
1316
1317
1318
1319
1320
1321
1322
1323
1324
1325
1326
1327
1328
1329
1330
1331
1332
1333
1334
1335
1336
1337
1338
1339
1340
1341
1342
1343
1344
1345
1346
1347
1348
1349
1350
1351
1352
1353
1354
1355
1356
1357
1358
1359
1360
1361
1362
1363
1364
1365
1366
1367
1368
1369
1370
1371
1372
1373
1374
1375
1376
1377
1378
1379
1380
1381
1382
1383
1384
1385
1386
1387
1388
1389
1390
1391
1392
1393
1394
1395
1396
1397
1398
1399
1400
1401
1402
1403
1404
1405
1406
1407
1408
1409
1410
1411
1412
1413
1414
1415
1416
1417
1418
1419
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
1431
1432
1433
1434
1435
1436
1437
1438
1439
1440
1441
1442
1443
1444
1445
1446
1447
1448
1449
1450
1451
1452
1453
1454
1455
1456
1457
1458
1459
1460
1461
1462
1463
1464
1465
1466
1467
1468
1469
1470
1471
1472
1473
1474
1475
1476
1477
1478
1479
1480
1481
1482
1483
1484
1485
1486
1487
1488
1489
1490
1491
1492
1493
1494
1495
1496
1497
1498
1499
1500
1501
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
1517
1518
1519
1520
1521
1522
1523
1524
1525
1526
1527
1528
1529
1530
1531
1532
1533
1534
1535
1536
1537
1538
1539
1540
1541
1542
1543
1544
1545
1546
1547
1548
1549
1550
1551
1552
1553
1554
1555
1556
1557
1558
1559
1560
1561
1562
1563
1564
1565
1566
1567
1568
1569
1570
1571
1572
1573
1574
1575
1576
1577
1578
1579
1580
1581
1582
1583
1584
1585
1586
1587
1588
1589
1590
1591
1592
1593
1594
1595
1596
1597
1598
1599
1600
1601
1602
1603
1604
1605
1606
1607
1608
1609
1610
1611
1612
1613
1614
1615
1616
1617
1618
1619
1620
1621
1622
1623
1624
1625
1626
1627
1628
1629
1630
1631
1632
1633
1634
1635
1636
1637
1638
1639
1640
1641
1642
1643
1644
1645
1646
1647
1648
1649
1650
1651
1652
1653
1654
1655
1656
1657
1658
1659
1660
1661
1662
1663
1664
1665
1666
1667
1668
1669
1670
1671
1672
1673
1674
1675
1676
1677
1678
1679
1680
1681
1682
1683
1684
1685
1686
1687
1688
1689
1690
1691
1692
1693
1694
1695
1696
1697
1698
1699
1700
1701
1702
1703
1704
1705
1706
1707
1708
1709
1710
1711
1712
1713
1714
1715
1716
1717
1718
1719
1720
1721
1722
# SOME DESCRIPTIVE TITLE.
# Copyright (C) 1999 Mandriva.
# Alexander Bokovoy <ab@avilink.net>, 2000
# Maryia Davidouskaia <maryia@scientist.com>, 2000
msgid ""
msgstr ""
"Project-Id-Version: DrakX VERSION\n"
"Report-Msgid-Bugs-To: \n"
"POT-Creation-Date: 2012-12-14 15:05+0100\n"
"PO-Revision-Date: 2000-09-24 12:30 +0100\n"
"Last-Translator: Alexander Bokovoy <ab@avilink.net>\n"
"Language-Team: be\n"
"Language: \n"
"MIME-Version: 1.0\n"
"Content-Type: text/plain; charset=UTF-8\n"
"Content-Transfer-Encoding: 8bit\n"
#: ../../advertising/01_IM_mageia.pl:1
#, c-format
msgid "Welcome"
msgstr "Вітаем"
#: ../../advertising/02_IM_mageia.pl:1
#, c-format
msgid "People!"
msgstr ""
#: ../../advertising/03_IM_mageia.pl:1
#, c-format
msgid "For people"
msgstr ""
#: ../../advertising/04_IM_mageia.pl:1
#, c-format
msgid "For developers"
msgstr ""
#: ../../advertising/05_IM_mageia.pl:1
#, c-format
msgid "For contributors"
msgstr ""
#: ../../advertising/06_IM_mageia.pl:1
#, c-format
msgid "For you"
msgstr ""
#: ../../advertising/07_IM_mageia.pl:1
#, c-format
msgid "Welcome!"
msgstr ""
#: any.pm:110
#, fuzzy, c-format
msgid "Do you have further supplementary media?"
msgstr "Ці ёсць у вас іншы?"
#. -PO: keep the double empty lines between sections, this is formatted a la LaTeX
#: any.pm:113
#, c-format
msgid ""
"The following media have been found and will be used during install: %s.\n"
"\n"
"\n"
"Do you have a supplementary installation medium to configure?"
msgstr ""
#: any.pm:121
#, c-format
msgid "CD-ROM"
msgstr "CD-ROM"
#: any.pm:122
#, fuzzy, c-format
msgid "Network (HTTP)"
msgstr "Сетка"
#: any.pm:123
#, fuzzy, c-format
msgid "Network (FTP)"
msgstr "Сетка"
#: any.pm:124
#, c-format
msgid "Network (NFS)"
msgstr ""
#: any.pm:171
#, c-format
msgid "URL of the mirror?"
msgstr ""
#: any.pm:177
#, c-format
msgid "URL must start with ftp:// or http://"
msgstr ""
#: any.pm:188
#, fuzzy, c-format
msgid "Contacting %s web site to get the list of available mirrors..."
msgstr "Сувязь з люрам для атрымання спісу даступных пакетаў"
#: any.pm:193
#, fuzzy, c-format
msgid "Failed contacting %s web site to get the list of available mirrors"
msgstr "Сувязь з люрам для атрымання спісу даступных пакетаў"
#: any.pm:203
#, c-format
msgid "Choose a mirror from which to get the packages"
msgstr "Выбар люстра для атрымання пакетаў"
#: any.pm:233
#, c-format
msgid "NFS setup"
msgstr ""
#: any.pm:234
#, c-format
msgid "Please enter the hostname and directory of your NFS media"
msgstr ""
#: any.pm:238
#, c-format
msgid "Hostname missing"
msgstr ""
#: any.pm:239
#, c-format
msgid "Directory must begin with \"/\""
msgstr ""
#: any.pm:243
#, c-format
msgid "Hostname of the NFS mount ?"
msgstr ""
#: any.pm:244
#, c-format
msgid "Directory"
msgstr "Каталёг"
#: any.pm:266
#, c-format
msgid "Supplementary"
msgstr ""
#: any.pm:301
#, fuzzy, c-format
msgid ""
"Can't find a package list file on this mirror. Make sure the location is "
"correct."
msgstr "Не знойздены праграмы\n"
#: any.pm:317
#, c-format
msgid "Core Release"
msgstr ""
#: any.pm:319
#, c-format
msgid "Tainted Release"
msgstr ""
#: any.pm:321
#, c-format
msgid "Nonfree Release"
msgstr ""
#: any.pm:335
#, c-format
msgid ""
"Some hardware on your machine needs some non free firmwares in order for the "
"free software drivers to work."
msgstr ""
#: any.pm:336
#, c-format
msgid "You should enable \"%s\""
msgstr ""
#: any.pm:355
#, c-format
msgid "\"%s\" contains the various pieces of the systems and its applications"
msgstr ""
#: any.pm:356
#, c-format
msgid "\"%s\" contains non free software.\n"
msgstr ""
#: any.pm:357
#, c-format
msgid ""
"It also contains firmwares needed for certain devices to operate (eg: some "
"ATI/AMD graphic cards, some network cards, some RAID cards, ...)"
msgstr ""
#: any.pm:358
#, c-format
msgid ""
"\"%s\" contains software that can not be distributed in every country due to "
"software patents."
msgstr ""
#: any.pm:359
#, c-format
msgid ""
"It also contains software from \"%s\" rebuild with additional capabilities."
msgstr ""
#: any.pm:363
#, c-format
msgid "Here you can enable more media if you want."
msgstr ""
#: any.pm:378
#, c-format
msgid "This medium provides package updates for medium \"%s\""
msgstr ""
#: any.pm:451
#, fuzzy, c-format
msgid "Looking at packages already installed..."
msgstr "Вы не можаце адмяніць вылучэнне гэтага пакету. Ён ужо ўсталяваны"
#: any.pm:485
#, c-format
msgid "Finding packages to upgrade..."
msgstr "Пошук пакетаў для абнаўлення"
#: any.pm:498
#, c-format
msgid "Removing packages prior to upgrade..."
msgstr ""
#. -PO: keep the double empty lines between sections, this is formatted a la LaTeX
#: any.pm:713
#, c-format
msgid ""
"The following packages will be removed to allow upgrading your system: %s\n"
"\n"
"\n"
"Do you really want to remove these packages?\n"
msgstr ""
#: any.pm:932
#, c-format
msgid "Error reading file %s"
msgstr "Памылка чытання файлу %s"
#: any.pm:1140
#, fuzzy, c-format
msgid "The following disk(s) were renamed:"
msgstr "Наступныя пакеты будуць даданы да сістэмы"
#: any.pm:1142
#, c-format
msgid "%s (previously named as %s)"
msgstr ""
#: any.pm:1199
#, c-format
msgid "HTTP"
msgstr ""
#: any.pm:1199
#, c-format
msgid "FTP"
msgstr "FTP"
#: any.pm:1199
#, fuzzy, c-format
msgid "NFS"
msgstr "ФС"
#: any.pm:1218 steps_interactive.pm:970
#, c-format
msgid "Network"
msgstr "Сетка"
#: any.pm:1222
#, fuzzy, c-format
msgid "Please choose a media"
msgstr "Калі ласка выбярыце відарыс відэа"
#: any.pm:1238
#, fuzzy, c-format
msgid "File already exists. Overwrite it?"
msgstr "Файл ужо йснуе. Перапісаць?"
#: any.pm:1242
#, c-format
msgid "Permission denied"
msgstr "Адмоўлена ў доступе"
#: any.pm:1290
#, fuzzy, c-format
msgid "Bad NFS name"
msgstr "Бяз назвы"
#: any.pm:1311
#, fuzzy, c-format
msgid "Bad media %s"
msgstr "Загружаецца файл %s"
#: any.pm:1355
#, fuzzy, c-format
msgid "Cannot make screenshots before partitioning"
msgstr "Дадаць раздзел немагчыма"
#: any.pm:1363
#, c-format
msgid "Screenshots will be available after install in %s"
msgstr ""
#: gtk.pm:128
#, fuzzy, c-format
msgid "Installation"
msgstr "Усталёўваем"
#: gtk.pm:132 share/meta-task/compssUsers.pl:43
#, c-format
msgid "Configuration"
msgstr "Канфігурацыя"
#: install2.pm:169
#, c-format
msgid "You must also format %s"
msgstr ""
#: interactive.pm:16
#, c-format
msgid ""
"Some hardware on your computer needs ``proprietary'' drivers to work.\n"
"You can find some information about them at: %s"
msgstr ""
"Пэўнае абсталяванне патрабуе камерцыйных драйвераў для працы.\n"
"Часткова інфармацыю пра іх можна атрымаць тут: %s"
#: interactive.pm:22
#, c-format
msgid "Bringing up the network"
msgstr "Далучэнне да сеткі"
#: interactive.pm:27
#, c-format
msgid "Bringing down the network"
msgstr "Адлучэнне ад сеткі"
#: media.pm:409
#, c-format
msgid "Please wait, retrieving file"
msgstr ""
#: media.pm:717
#, c-format
msgid "unable to add medium"
msgstr ""
#: media.pm:757
#, c-format
msgid "Copying some packages on disks for future use"
msgstr ""
#: media.pm:810
#, fuzzy, c-format
msgid "Copying in progress"
msgstr "Стварэньне меню ўжо запушчана"
#: pkgs.pm:32
#, c-format
msgid "must have"
msgstr "павінны мець"
#: pkgs.pm:33
#, c-format
msgid "important"
msgstr "важна"
#: pkgs.pm:34
#, c-format
msgid "very nice"
msgstr "вельмі добра"
#: pkgs.pm:35
#, c-format
msgid "nice"
msgstr "добра"
#: pkgs.pm:36
#, c-format
msgid "maybe"
msgstr "можа быць"
#: pkgs.pm:102
#, c-format
msgid "Getting package information from XML meta-data..."
msgstr ""
#: pkgs.pm:111
#, c-format
msgid "No xml info for medium \"%s\", only partial result for package %s"
msgstr ""
#: pkgs.pm:119
#, c-format
msgid "No description"
msgstr "Апісаньне адсутнічае"
#: pkgs.pm:287
#, c-format
msgid ""
"Some packages requested by %s cannot be installed:\n"
"%s"
msgstr ""
#: pkgs.pm:382 pkgs.pm:409
#, fuzzy, c-format
msgid "An error occurred:"
msgstr "Адбылася памылка"
#: pkgs.pm:401
#, fuzzy, c-format
msgid "A fatal error occurred: %s."
msgstr ""
"ПАМЫЛАЧКА АТРЫМАЛАСЯ: \n"
"%s"
#: pkgs.pm:891 pkgs.pm:928
#, c-format
msgid "Do not ask again"
msgstr ""
#: pkgs.pm:907
#, fuzzy, c-format
msgid "%d installation transactions failed"
msgstr "Усталяванне SILO"
#: pkgs.pm:908
#, fuzzy, c-format
msgid "Installation of packages failed:"
msgstr "Усталяванне пакету %s"
#: share/meta-task/compssUsers.pl:13
#, fuzzy, c-format
msgid "Workstation"
msgstr "Канфігурацыя"
#: share/meta-task/compssUsers.pl:15
#, fuzzy, c-format
msgid "Office Workstation"
msgstr "Працоўныя мейсцы"
#: share/meta-task/compssUsers.pl:17
#, c-format
msgid ""
"Office programs: wordprocessors (LibreOffice Writer, Kword), spreadsheets "
"(LibreOffice Calc, Kspread), PDF viewers, etc"
msgstr ""
"Офісныя праграмы: працэсары словаў (LibreOffice Writer, Kword), электроныя "
"табліцы, аглядальнікі pdf-файлаў, і г.д."
#: share/meta-task/compssUsers.pl:22
#, fuzzy, c-format
msgid "Game station"
msgstr "Аўтэнтыфікацыя"
#: share/meta-task/compssUsers.pl:23
#, c-format
msgid "Amusement programs: arcade, boards, strategy, etc"
msgstr "Забаўляльныя праграмы: аркады, стратэгіі і г.д."
#: share/meta-task/compssUsers.pl:26
#, fuzzy, c-format
msgid "Multimedia station"
msgstr "Мульцімедыя"
#: share/meta-task/compssUsers.pl:27
#, c-format
msgid "Sound and video playing/editing programs"
msgstr "Рэдактары і прайгравальнікі гуку і відэа"
#: share/meta-task/compssUsers.pl:32
#, fuzzy, c-format
msgid "Internet station"
msgstr "Інтэрнэт"
#: share/meta-task/compssUsers.pl:33
#, c-format
msgid ""
"Set of tools to read and send mail and news (mutt, tin..) and to browse the "
"Web"
msgstr ""
#: share/meta-task/compssUsers.pl:38
#, fuzzy, c-format
msgid "Network Computer (client)"
msgstr "Сеткавы прынтэр (TCP/Socket)"
#: share/meta-task/compssUsers.pl:39
#, c-format
msgid "Clients for different protocols including ssh"
msgstr ""
#: share/meta-task/compssUsers.pl:44
#, fuzzy, c-format
msgid "Tools to ease the configuration of your computer"
msgstr "Ці жадаеце пратэсціраваць настройкі?"
#: share/meta-task/compssUsers.pl:48
#, c-format
msgid "Console Tools"
msgstr "Кансольныя інструментальныя сродкі"
#: share/meta-task/compssUsers.pl:49
#, c-format
msgid "Editors, shells, file tools, terminals"
msgstr "Рэдактары, абалонкі, тэрміналы"
#: share/meta-task/compssUsers.pl:53 share/meta-task/compssUsers.pl:156
#: share/meta-task/compssUsers.pl:158
#, c-format
msgid "Development"
msgstr "Распрацоўка"
#: share/meta-task/compssUsers.pl:54 share/meta-task/compssUsers.pl:159
#, c-format
msgid "C and C++ development libraries, programs and include files"
msgstr "Бібліятэкі і праграмы для распрацоўкі на С і С++"
#: share/meta-task/compssUsers.pl:57 share/meta-task/compssUsers.pl:163
#, c-format
msgid "Documentation"
msgstr "Дакумэнтацыя"
#: share/meta-task/compssUsers.pl:58 share/meta-task/compssUsers.pl:164
#, c-format
msgid "Books and Howto's on Linux and Free Software"
msgstr "нігі і Howto па Linux і Free Software"
#: share/meta-task/compssUsers.pl:62 share/meta-task/compssUsers.pl:167
#, c-format
msgid "LSB"
msgstr ""
#: share/meta-task/compssUsers.pl:63 share/meta-task/compssUsers.pl:168
#, c-format
msgid "Linux Standard Base. Third party applications support"
msgstr ""
#: share/meta-task/compssUsers.pl:72
#, fuzzy, c-format
msgid "Web Server"
msgstr "Сервак"
#: share/meta-task/compssUsers.pl:73
#, fuzzy, c-format
msgid "Apache"
msgstr "Шлях:"
#: share/meta-task/compssUsers.pl:76
#, fuzzy, c-format
msgid "Groupware"
msgstr "Групы"
#: share/meta-task/compssUsers.pl:77
#, fuzzy, c-format
msgid "Kolab Server"
msgstr "NIS сэервер:"
#: share/meta-task/compssUsers.pl:80 share/meta-task/compssUsers.pl:121
#, fuzzy, c-format
msgid "Firewall/Router"
msgstr "Рэстарт"
#: share/meta-task/compssUsers.pl:81 share/meta-task/compssUsers.pl:122
#, fuzzy, c-format
msgid "Internet gateway"
msgstr "Інтэрнэт"
#: share/meta-task/compssUsers.pl:84
#, fuzzy, c-format
msgid "Mail/News"
msgstr "/Файл/_Стварыць"
#: share/meta-task/compssUsers.pl:85
#, c-format
msgid "Postfix mail server, Inn news server"
msgstr ""
#: share/meta-task/compssUsers.pl:88
#, fuzzy, c-format
msgid "Directory Server"
msgstr "Каталог %s Так"
#: share/meta-task/compssUsers.pl:92
#, fuzzy, c-format
msgid "FTP Server"
msgstr "NIS сэервер:"
#: share/meta-task/compssUsers.pl:93
#, c-format
msgid "ProFTPd"
msgstr ""
#: share/meta-task/compssUsers.pl:96
#, c-format
msgid "DNS/NIS"
msgstr ""
#: share/meta-task/compssUsers.pl:97
#, fuzzy, c-format
msgid "Domain Name and Network Information Server"
msgstr "Імя дамену"
#: share/meta-task/compssUsers.pl:100
#, fuzzy, c-format
msgid "File and Printer Sharing Server"
msgstr "Сервер друку"
#: share/meta-task/compssUsers.pl:101
#, fuzzy, c-format
msgid "NFS Server, Samba server"
msgstr "X сэервер"
#: share/meta-task/compssUsers.pl:104 share/meta-task/compssUsers.pl:117
#, c-format
msgid "Database"
msgstr "База даньняў"
#: share/meta-task/compssUsers.pl:105
#, c-format
msgid "PostgreSQL and MariaDB Database Server"
msgstr ""
#: share/meta-task/compssUsers.pl:109
#, c-format
msgid "Web/FTP"
msgstr ""
#: share/meta-task/compssUsers.pl:110
#, c-format
msgid "Apache, Pro-ftpd"
msgstr ""
#: share/meta-task/compssUsers.pl:113
#, c-format
msgid "Mail"
msgstr "Пошта"
#: share/meta-task/compssUsers.pl:114
#, c-format
msgid "Postfix mail server"
msgstr ""
#: share/meta-task/compssUsers.pl:118
#, c-format
msgid "PostgreSQL or MariaDB database server"
msgstr ""
#: share/meta-task/compssUsers.pl:125
#, fuzzy, c-format
msgid "Network Computer server"
msgstr "Сеткавыя інтэрфэйсы"
#: share/meta-task/compssUsers.pl:126
#, c-format
msgid "NFS server, SMB server, Proxy server, ssh server"
msgstr ""
#: share/meta-task/compssUsers.pl:132
#, fuzzy, c-format
msgid "Graphical Environment"
msgstr "Абалонка"
#: share/meta-task/compssUsers.pl:134
#, fuzzy, c-format
msgid "KDE Workstation"
msgstr "Канфігурацыя"
#: share/meta-task/compssUsers.pl:135
#, c-format
msgid ""
"The K Desktop Environment, the basic graphical environment with a collection "
"of accompanying tools"
msgstr ""
"The K Desktop Environment - асноўнае графічнае асяродзе з калекцыяй "
"інструментальных сродкаў"
#: share/meta-task/compssUsers.pl:139
#, fuzzy, c-format
msgid "GNOME Workstation"
msgstr "Інфармацыя аб памяці"
#: share/meta-task/compssUsers.pl:140
#, c-format
msgid ""
"A graphical environment with user-friendly set of applications and desktop "
"tools"
msgstr ""
"Графічнае асяродзе са зручным дзеля выкарыстання наборам прыкладанняў і "
"інструментальных сродкаў"
#: share/meta-task/compssUsers.pl:144
#, fuzzy, c-format
msgid "LXDE Desktop"
msgstr "Працоўны стол"
#: share/meta-task/compssUsers.pl:146
#, fuzzy, c-format
msgid ""
"A lightweight & fast graphical environment with user-friendly set of "
"applications and desktop tools"
msgstr ""
"Графічнае асяродзе са зручным дзеля выкарыстання наборам прыкладанняў і "
"інструментальных сродкаў"
#: share/meta-task/compssUsers.pl:149
#, c-format
msgid "Other Graphical Desktops"
msgstr "Іншыя графічныя Працоўныя сталы"
#: share/meta-task/compssUsers.pl:150
#, c-format
msgid "Window Maker, Enlightenment, Fvwm, etc"
msgstr ""
#: share/meta-task/compssUsers.pl:173
#, c-format
msgid "Utilities"
msgstr "Карыснасьці"
#: share/meta-task/compssUsers.pl:175 share/meta-task/compssUsers.pl:176
#, fuzzy, c-format
msgid "SSH Server"
msgstr "NIS сэервер:"
#: share/meta-task/compssUsers.pl:180
#, fuzzy, c-format
msgid "Webmin"
msgstr "Прылады"
#: share/meta-task/compssUsers.pl:181
#, fuzzy, c-format
msgid "Webmin Remote Configuration Server"
msgstr "Сістэмнае адміністраваньне"
#: share/meta-task/compssUsers.pl:185
#, fuzzy, c-format
msgid "Network Utilities/Monitoring"
msgstr "Канфігурацыя сеткі"
#: share/meta-task/compssUsers.pl:186
#, c-format
msgid "Monitoring tools, processes accounting, tcpdump, nmap, ..."
msgstr ""
#: share/meta-task/compssUsers.pl:190
#, fuzzy, c-format
msgid "Mageia Wizards"
msgstr "Цэнтар кіраваньня"
#: share/meta-task/compssUsers.pl:191
#, fuzzy, c-format
msgid "Wizards to configure server"
msgstr "Немагчыма выдаліць \"%s\": %s."
#: steps.pm:85
#, c-format
msgid ""
"An error occurred, but I do not know how to handle it nicely.\n"
"Continue at your own risk."
msgstr ""
"Узнікла памылка, якую не атрымліваецца карэктна апрацаваць,\n"
"таму працягвайце на сваю рызыку."
#: steps.pm:461
#, c-format
msgid ""
"Some important packages did not get installed properly.\n"
"Either your cdrom drive or your cdrom is defective.\n"
"Check the cdrom on an installed computer using \"rpm -qpl media/main/*.rpm"
"\"\n"
msgstr ""
"Некаторыя важныя пакеты не былі ўсталяваны карэктна.\n"
"Другі ваш cdrom дыск ці ваш cdrom маюць дэфекты.\n"
"Праверце cdrom на вашым кампутары, выкарыстоўваючы\"rpm -qpl media/main/*.rpm"
"\"\n"
#: steps_auto_install.pm:71 steps_stdio.pm:27
#, c-format
msgid "Entering step `%s'\n"
msgstr "Пераход на крок ‛%s’\n"
#: steps_curses.pm:22
#, c-format
msgid "%s Installation %s"
msgstr "Усталяванне %s %s"
#: steps_curses.pm:32
#, c-format
msgid "<Tab>/<Alt-Tab> between elements"
msgstr "<Tab>/<Alt-Tab> паміж элементамі"
#: steps_gtk.pm:146
#, c-format
msgid "Xorg server is slow to start. Please wait..."
msgstr ""
#: steps_gtk.pm:210
#, c-format
msgid ""
"Your system is low on resources. You may have some problem installing\n"
"%s. If that occurs, you can try a text install instead. For this,\n"
"press `F1' when booting on CDROM, then enter `text'."
msgstr ""
"У Вашай сістэме маецца недахоп рэсурсаў, таму магчымы праблемы\n"
"пры ўсталяванні %s. У гэтым выпадку паспрабуйце тэкставую\n"
"праграму ўсталявання. Для гэтага націсніце ‛F1’ у час загрузкі, а потым\n"
"набярыце ‛text’ і націсніце <ENTER>."
#: steps_gtk.pm:243
#, c-format
msgid "Install %s KDE Desktop"
msgstr ""
#: steps_gtk.pm:244
#, c-format
msgid "Install %s GNOME Desktop"
msgstr ""
#: steps_gtk.pm:245
#, fuzzy, c-format
msgid "Custom install"
msgstr "Ахоўнік экрану"
#: steps_gtk.pm:266
#, fuzzy, c-format
msgid "KDE Desktop"
msgstr "Працоўны стол"
#: steps_gtk.pm:267
#, fuzzy, c-format
msgid "GNOME Desktop"
msgstr "Працоўны стол"
#: steps_gtk.pm:268
#, fuzzy, c-format
msgid "Custom Desktop"
msgstr "Працоўны стол"
#: steps_gtk.pm:274
#, c-format
msgid "Here's a preview of the '%s' desktop."
msgstr ""
#: steps_gtk.pm:301
#, c-format
msgid "Click on images in order to see a bigger preview"
msgstr ""
#: steps_gtk.pm:319 steps_interactive.pm:633 steps_list.pm:30
#, c-format
msgid "Package Group Selection"
msgstr "Выбар групы пакетаў"
#: steps_gtk.pm:344 steps_interactive.pm:650
#, c-format
msgid "Individual package selection"
msgstr "Асабісты выбар пакетаў"
#: steps_gtk.pm:351
#, fuzzy, c-format
msgid "Unselect All"
msgstr "Дадаць выбраныя файлы"
#: steps_gtk.pm:370 steps_interactive.pm:562
#, c-format
msgid "Total size: %d / %d MB"
msgstr "Агульны памер: %d / %d Мб"
#: steps_gtk.pm:415
#, c-format
msgid "Version: "
msgstr "Вэрсія: "
#: steps_gtk.pm:416
#, c-format
msgid "Size: "
msgstr "Памер: "
#: steps_gtk.pm:416
#, c-format
msgid "%d KB\n"
msgstr ""
#: steps_gtk.pm:417
#, fuzzy, c-format
msgid "Importance: "
msgstr "важна"
#: steps_gtk.pm:452
#, c-format
msgid "You cannot select/unselect this package"
msgstr "Вы не можаце вылучаць і адмяняць вылучэнне гэтага пакету"
#: steps_gtk.pm:456
#, c-format
msgid "due to missing %s"
msgstr ""
#: steps_gtk.pm:457
#, c-format
msgid "due to unsatisfied %s"
msgstr ""
#: steps_gtk.pm:458
#, c-format
msgid "trying to promote %s"
msgstr ""
#: steps_gtk.pm:459
#, fuzzy, c-format
msgid "in order to keep %s"
msgstr "Уласьцівасьці акна"
#: steps_gtk.pm:464
#, c-format
msgid ""
"You cannot select this package as there is not enough space left to install "
"it"
msgstr ""
"Вы не можаце выбраць гэты пакет, таму як не хапае месца для яго ўсталявання"
#: steps_gtk.pm:467
#, c-format
msgid "The following packages are going to be installed"
msgstr "Наступныя пакеты будуць даданы да сістэмы"
#: steps_gtk.pm:468
#, c-format
msgid "The following packages are going to be removed"
msgstr "Наступныя пакеты будуць выдалены"
#: steps_gtk.pm:494
#, c-format
msgid "This is a mandatory package, it cannot be unselected"
msgstr "Гэта абавязковы пакет, яго вылучэнне нельга адмяніць"
#: steps_gtk.pm:496
#, c-format
msgid "You cannot unselect this package. It is already installed"
msgstr "Вы не можаце адмяніць вылучэнне гэтага пакету. Ён ужо ўсталяваны"
#: steps_gtk.pm:498
#, c-format
msgid "You cannot unselect this package. It must be upgraded"
msgstr "Вы не можаце адмяніць вылучэнне гэтага пакету. Яго патрэбна абнавіць"
#: steps_gtk.pm:502
#, c-format
msgid "Show automatically selected packages"
msgstr ""
#: steps_gtk.pm:509
#, c-format
msgid "Install"
msgstr "Усталёўка"
#: steps_gtk.pm:512
#, fuzzy, c-format
msgid "Load/Save selection"
msgstr "Перанесьці вылучэньне"
#: steps_gtk.pm:513
#, fuzzy, c-format
msgid "Updating package selection"
msgstr "Асабісты выбар пакетаў"
#: steps_gtk.pm:518
#, fuzzy, c-format
msgid "Minimal install"
msgstr "Ахоўнік экрану"
#: steps_gtk.pm:531
#, fuzzy, c-format
msgid "Software Management"
msgstr "Мэнэджэр сэрвісаў"
#: steps_gtk.pm:531 steps_interactive.pm:443
#, c-format
msgid "Choose the packages you want to install"
msgstr "Выбар пакетаў для ўсталявання"
#: steps_gtk.pm:548 steps_interactive.pm:670 steps_list.pm:32
#, c-format
msgid "Installing"
msgstr "Усталёўваем"
#: steps_gtk.pm:578
#, fuzzy, c-format
msgid "No details"
msgstr "Падрабязнасці"
#: steps_gtk.pm:597
#, fuzzy, c-format
msgid "Time remaining:"
msgstr "Засталося часу "
#: steps_gtk.pm:598
#, fuzzy, c-format
msgid "(estimating...)"
msgstr "Чакаецца"
#: steps_gtk.pm:628
#, fuzzy, c-format
msgid "%d package"
msgid_plural "%d packages"
msgstr[0] "%d пакетаў"
msgstr[1] "%d пакетаў"
#: steps_gtk.pm:683 steps_interactive.pm:834 steps_list.pm:43
#, c-format
msgid "Summary"
msgstr "Агульныя зьвесткі"
#: steps_gtk.pm:702
#, c-format
msgid "Configure"
msgstr "Настройка"
#: steps_gtk.pm:719 steps_interactive.pm:830 steps_interactive.pm:983
#, fuzzy, c-format
msgid "not configured"
msgstr "Настроіць панэль"
#: steps_gtk.pm:753
#, fuzzy, c-format
msgid "Media Selection"
msgstr "Выбар групы пакетаў"
#: steps_gtk.pm:762 steps_interactive.pm:343
#, c-format
msgid ""
"The following installation media have been found.\n"
"If you want to skip some of them, you can unselect them now."
msgstr ""
#: steps_gtk.pm:778 steps_interactive.pm:349
#, c-format
msgid ""
"You have the option to copy the contents of the CDs onto the hard disk drive "
"before installation.\n"
"It will then continue from the hard disk drive and the packages will remain "
"available once the system is fully installed."
msgstr ""
#: steps_gtk.pm:780 steps_interactive.pm:351
#, c-format
msgid "Copy whole CDs"
msgstr ""
#: steps_interactive.pm:40
#, c-format
msgid "An error occurred"
msgstr "Адбылася памылка"
#: steps_interactive.pm:105
#, fuzzy, c-format
msgid "Please choose your keyboard layout"
msgstr "Калі ласка, абярыце тып клавіятуры"
#: steps_interactive.pm:109
#, c-format
msgid "Here is the full list of available keyboards:"
msgstr ""
#: steps_interactive.pm:153
#, fuzzy, c-format
msgid "Install/Upgrade"
msgstr "Усталёўваем"
#: steps_interactive.pm:157
#, c-format
msgid "Is this an install or an upgrade?"
msgstr ""
#: steps_interactive.pm:159
#, fuzzy, c-format
msgid ""
"_: This is a noun:\n"
"Install"
msgstr "Усталёўка"
#: steps_interactive.pm:161
#, c-format
msgid "Upgrade %s"
msgstr ""
#: steps_interactive.pm:184
#, c-format
msgid "Encryption key for %s"
msgstr ""
#: steps_interactive.pm:217
#, c-format
msgid "Cancel installation, reboot system"
msgstr ""
#: steps_interactive.pm:218
#, fuzzy, c-format
msgid "New Installation"
msgstr "Усталёўваем"
#: steps_interactive.pm:219
#, c-format
msgid "Upgrade previous installation (not recommended)"
msgstr ""
#: steps_interactive.pm:223
#, c-format
msgid ""
"Installer has detected that your installed Linux system could not\n"
"safely be upgraded to %s.\n"
"\n"
"New installation replacing your previous one is recommended.\n"
"\n"
"Warning : you should backup all your personal data before choosing \"New\n"
"Installation\"."
msgstr ""
#: steps_interactive.pm:264
#, c-format
msgid "IDE"
msgstr "IDE"
#: steps_interactive.pm:264
#, c-format
msgid "Configuring IDE"
msgstr "Настройка IDE"
#: steps_interactive.pm:301
#, c-format
msgid ""
"No free space for 1MB bootstrap! Install will continue, but to boot your "
"system, you'll need to create the bootstrap partition in DiskDrake"
msgstr ""
#: steps_interactive.pm:306
#, c-format
msgid ""
"You'll need to create a PPC PReP Boot bootstrap! Install will continue, but "
"to boot your system, you'll need to create the bootstrap partition in "
"DiskDrake"
msgstr ""
#: steps_interactive.pm:382
#, fuzzy, c-format
msgid ""
"Change your Cd-Rom!\n"
"Please insert the Cd-Rom labelled \"%s\" in your drive and press Ok when "
"done.\n"
"If you do not have it, press Cancel to avoid installation from this Cd-Rom."
msgstr ""
"Змяніце ваш Cd-Rom!\n"
"\n"
"Калі ласка, устаўце Cd-Rom, пазначаны \"%s\", у ваш дыскавод і націсніце Ок "
"пасля.\n"
"Калі вы не маеце яго, націсніце Адмяніць, каб адмяніць усталяванне з гэтага "
"Cd."
#: steps_interactive.pm:400
#, c-format
msgid "Looking for available packages..."
msgstr "Прагляд даступных пакетаў"
#: steps_interactive.pm:408
#, c-format
msgid ""
"Your system does not have enough space left for installation or upgrade "
"(%dMB > %dMB)"
msgstr ""
#: steps_interactive.pm:456
#, c-format
msgid ""
"Please choose load or save package selection.\n"
"The format is the same as auto_install generated files."
msgstr ""
#: steps_interactive.pm:458
#, c-format
msgid "Load"
msgstr "Загрузка"
#: steps_interactive.pm:458
#, c-format
msgid "Save"
msgstr "Захаваць"
#: steps_interactive.pm:466
#, fuzzy, c-format
msgid "Bad file"
msgstr "Загрузка файла"
#: steps_interactive.pm:483
#, fuzzy, c-format
msgid "KDE"
msgstr "IDE"
#: steps_interactive.pm:484
#, c-format
msgid "GNOME"
msgstr "GNOME"
#: steps_interactive.pm:487
#, fuzzy, c-format
msgid "Desktop Selection"
msgstr "Выбар групы пакетаў"
#: steps_interactive.pm:488
#, c-format
msgid "You can choose your workstation desktop profile."
msgstr ""
#: steps_interactive.pm:576
#, c-format
msgid "Selected size is larger than available space"
msgstr ""
#: steps_interactive.pm:600
#, c-format
msgid "Type of install"
msgstr ""
#: steps_interactive.pm:601
#, c-format
msgid ""
"You have not selected any group of packages.\n"
"Please choose the minimal installation you want:"
msgstr ""
#: steps_interactive.pm:606
#, c-format
msgid "With X"
msgstr ""
#: steps_interactive.pm:607
#, fuzzy, c-format
msgid "Install suggested packages"
msgstr "Усталяванне пакету %s"
#: steps_interactive.pm:608
#, c-format
msgid "With basic documentation (recommended!)"
msgstr ""
#: steps_interactive.pm:609
#, c-format
msgid "Truly minimal install (especially no urpmi)"
msgstr ""
#: steps_interactive.pm:661
#, fuzzy, c-format
msgid "Preparing upgrade..."
msgstr "Падрыхтоўка загрузчыка"
#: steps_interactive.pm:671
#, c-format
msgid "Preparing installation"
msgstr "Падрыхтоўка ўсталяваньня"
#: steps_interactive.pm:679
#, c-format
msgid "Installing package %s"
msgstr "Усталяванне пакету %s"
#: steps_interactive.pm:703
#, c-format
msgid "There was an error ordering packages:"
msgstr "Атрымалася памылка ўпарадкавання пакетаў:"
#: steps_interactive.pm:703
#, c-format
msgid "Go on anyway?"
msgstr "Усё роўна працягваць?"
#: steps_interactive.pm:707
#, fuzzy, c-format
msgid "Retry"
msgstr "Аднавіць"
#: steps_interactive.pm:708
#, c-format
msgid "Skip this package"
msgstr ""
#: steps_interactive.pm:709
#, c-format
msgid "Skip all packages from medium \"%s\""
msgstr ""
#: steps_interactive.pm:710
#, fuzzy, c-format
msgid "Go back to media and packages selection"
msgstr "Асабісты выбар пакетаў"
#: steps_interactive.pm:713
#, fuzzy, c-format
msgid "There was an error installing package %s."
msgstr "Атрымалася памылка ўпарадкавання пакетаў:"
#: steps_interactive.pm:732
#, c-format
msgid "Post-install configuration"
msgstr "Настройка пасля ўсталявання"
#: steps_interactive.pm:739
#, c-format
msgid "Please ensure the Update Modules media is in drive %s"
msgstr ""
#: steps_interactive.pm:767 steps_list.pm:47
#, fuzzy, c-format
msgid "Updates"
msgstr "Аднавіць"
#: steps_interactive.pm:768
#, c-format
msgid ""
"You now have the opportunity to download updated packages. These packages\n"
"have been updated after the distribution was released. They may\n"
"contain security or bug fixes.\n"
"\n"
"To download these packages, you will need to have a working Internet \n"
"connection.\n"
"\n"
"Do you want to install the updates?"
msgstr ""
#. -PO: example: lilo-graphic on /dev/hda1
#: steps_interactive.pm:878
#, c-format
msgid "%s on %s"
msgstr "%s на %s"
#: steps_interactive.pm:910 steps_interactive.pm:917 steps_interactive.pm:930
#: steps_interactive.pm:947 steps_interactive.pm:962
#, c-format
msgid "Hardware"
msgstr "Абсталяваньне"
#: steps_interactive.pm:931 steps_interactive.pm:948
#, fuzzy, c-format
msgid "Sound card"
msgstr "Праграма гуказапісу"
#: steps_interactive.pm:951
#, fuzzy, c-format
msgid "Do you have an ISA sound card?"
msgstr "Ці ёсць у вас іншы?"
#: steps_interactive.pm:953
#, c-format
msgid ""
"Run \"alsaconf\" or \"sndconfig\" after installation to configure your sound "
"card"
msgstr ""
#: steps_interactive.pm:955
#, c-format
msgid "No sound card detected. Try \"harddrake\" after installation"
msgstr ""
#: steps_interactive.pm:963
#, fuzzy, c-format
msgid "Graphical interface"
msgstr "Запуск X пры старце сістэмы"
#: steps_interactive.pm:969 steps_interactive.pm:981
#, fuzzy, c-format
msgid "Network & Internet"
msgstr "Сеткавы інтэрфейс"
#: steps_interactive.pm:982
#, fuzzy, c-format
msgid "Proxies"
msgstr "Проксі"
#: steps_interactive.pm:983
#, fuzzy, c-format
msgid "configured"
msgstr "Настроіць панэль"
#: steps_interactive.pm:993
#, c-format
msgid "Security Level"
msgstr "Узровень бясьпекі"
#: steps_interactive.pm:1013
#, c-format
msgid "Firewall"
msgstr ""
#: steps_interactive.pm:1017
#, c-format
msgid "activated"
msgstr ""
#: steps_interactive.pm:1017
|