Lines Matching refs:name
80 my ($name, $shortnamesref) = @_;
91 $newname = $name . $counter;
106 if (( $counter > 9 ) && ( length($name) > 6 )) { $dontsave = 1; }
107 if (( $counter > 99 ) && ( length($name) > 5 )) { $dontsave = 1; }
125 my ($name, $shortnamesref, $ext) = @_;
137 $newname = $name . $counter;
147 if (( $counter > 9 ) && ( length($name) > 6 )) { $dontsave = 1; }
148 if (( $counter > 99 ) && ( length($name) > 5 )) { $dontsave = 1; }
170 my ($name, $namelength, $number);
176 $name = $1;
179 $namelength = length($name);
193 $name = substr($name, 0, 6); # name, offset, length
194 $name =~ s/\s*$//; # removing ending whitespaces
195 $name = $name . "\~";
196 $number = get_next_free_number($name, $shortnamesref);
202 $name = substr($name, 0, 5); # name, offset, length
203 $name =~ s/\s*$//; # removing ending whitespaces
204 $name = $name . "\~";
205 $number = get_next_free_number($name, $shortnamesref);
209 $name = substr($name, 0, 4); # name, offset, length
210 $name =~ s/\s*$//; # removing ending whitespaces
211 $name = $name . "\~";
212 $number = get_next_free_number($name, $shortnamesref);
216 $name = $name . "$number";
221 $conformstring = $name . "\." . $extension;
227 $name = $inputstring;
228 $namelength = length($name);
233 $name = substr($name, 0, 6); # name, offset, length
234 $name =~ s/\s*$//; # removing ending whitespaces
235 $name = $name . "\~";
236 $number = get_next_free_number($name, $shortnamesref);
242 $name = substr($name, 0, 5); # name, offset, length
243 $name =~ s/\s*$//; # removing ending whitespaces
244 $name = $name . "\~";
245 $number = get_next_free_number($name, $shortnamesref);
249 $name = substr($name, 0, 4); # name, offset, length
250 $name =~ s/\s*$//; # removing ending whitespaces
251 $name = $name . "\~";
252 $number = get_next_free_number($name, $shortnamesref);
256 $name = $name . "$number";
258 if ( $pattern eq "dir" ) { $name =~ s/\./\_/g; } # in directories replacing "." with "_"
261 $conformstring = $name;
263 if ( $changed ) { $conformstring = uc($name); }
281 my ($name, $namelength, $number);
290 $name = $1;
293 if ( $name =~ /^\s*(.*?)\s*$/ ) { $name = $1; } # now the name is also non-greedy
294 $name =~ s/\.//g; # no dots in 8+3 conform filename
296 $namelength = length($name);
313 $name = substr($name, 0, 6); # name, offset, length
314 $name =~ s/\s*$//; # removing ending whitespaces
315 $name = $name . "\~";
316 ($number, $saved) = get_next_free_number_with_hash($name, $shortnamesref, '.'.uc($extension));
322 $name = substr($name, 0, 5); # name, offset, length
323 $name =~ s/\s*$//; # removing ending whitespaces
324 $name = $name . "\~";
325 ($number, $saved) = get_next_free_number_with_hash($name, $shortnamesref, '.'.uc($extension));
331 $name = substr($name, 0, 4); # name, offset, length
332 $name =~ s/\s*$//; # removing ending whitespaces
333 $name = $name . "\~";
334 ($number, $saved) = get_next_free_number_with_hash($name, $shortnamesref, '.'.uc($extension));
343 $name = $name . "$number";
348 $conformstring = $name . "\." . $extension;
354 $name = $inputstring;
355 $namelength = length($name);
360 $name = substr($name, 0, 6); # name, offset, length
361 $name =~ s/\s*$//; # removing ending whitespaces
362 $name = $name . "\~";
363 ( $number, $saved ) = get_next_free_number_with_hash($name, $shortnamesref, '');
369 $name = substr($name, 0, 5); # name, offset, length
370 $name =~ s/\s*$//; # removing ending whitespaces
371 $name = $name . "\~";
372 ( $number, $saved ) = get_next_free_number_with_hash($name, $shortnamesref, '');
378 $name = substr($name, 0, 4); # name, offset, length
379 $name =~ s/\s*$//; # removing ending whitespaces
380 $name = $name . "\~";
381 ( $number, $saved ) = get_next_free_number_with_hash($name, $shortnamesref, '');
387 $name = $name . "$number";
389 if ( $pattern eq "dir" ) { $name =~ s/\./\_/g; } # in directories replacing "." with "_"
392 $conformstring = $name;
394 if ( $changed ) { $conformstring = uc($name); }
1592 my $name = $onefile->{'Name'};
1594 $destination =~ s/\Q$name\E\s*$//;
1630 my $name = "";
1643 $name = $3;
1645 if ( $dirname eq $name )
1651 my $newname = $name . "\:" . $subdir;
2011 my ($gid, $name, $key, $assignmenthashref, $parameter, $tablename, $assignmentarray) = @_;
2044 my ($gid, $name, $key, $assignmentarray) = @_;
2059 …fill_assignment_hash($gid, $name, $key, $assignmenthashref, $parameter, $tablename, $assignmentarr…
2066 …fill_assignment_hash($gid, $name, $key, $assignmenthashref, $parameter, $tablename, $assignmentarr…
2073 …fill_assignment_hash($gid, $name, $key, $assignmenthashref, $parameter, $tablename, $assignmentarr…
2080 …fill_assignment_hash($gid, $name, $key, $assignmenthashref, $parameter, $tablename, $assignmentarr…
2087 …fill_assignment_hash($gid, $name, $key, $assignmenthashref, $parameter, $tablename, $assignmentarr…
2289 my $name = $customaction->{'Name'};
2299 …my $added_customaction = set_custom_action($customactionidttable, $name, $typ, $source, $target, $…
2338 my $assignment = create_customaction_assignment_hash($gid, $name, $key, $assignmentarray);
2342 …add_custom_action_to_install_table($installexecutetable, $source, $name, $assignment->{'parameter2…
2346 …add_custom_action_to_install_table($adminexecutetable, $source, $name, $assignment->{'parameter2'}…
2350 …add_custom_action_to_install_table($installuitable, $source, $name, $assignment->{'parameter2'}, $…