File: adddir

package info (click to toggle)
oxref 2.02.00-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 692 kB
  • sloc: cpp: 1,282; makefile: 131; sh: 48
file content (27 lines) | stat: -rw-r--r-- 597 bytes parent folder | download | duplicates (19) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
 
list addDir(list dir, string entry)
{
    list ret;
    int idx;
    int keep = 1;
    string elem;

    for (idx = listlen(dir); idx--; )
    {
        elem = dir[idx];

        if (strfind(entry, elem) != -1)  // entry contains dir, ignore dir
            ret += (list)entry;
        else if (strfind(elem, entry) != -1)  // dir contains entry
        {
            ret += (list)elem;
            keep = 0;
        }
        else                                // new unique entry, keep dir[idx]
            ret += (list)elem;
    }

    if (keep)
        ret += (list)entry;

    return ret;
}