FILTER_UNRELEASE = 1<<1,
        FILTER_PID = 1<<2,
        FILTER_TGID = 1<<3,
-       FILTER_TASK_COMM_NAME = 1<<4
+       FILTER_COMM = 1<<4
+};
+enum CULL_BIT {
+       CULL_UNRELEASE = 1<<1,
+       CULL_PID = 1<<2,
+       CULL_TGID = 1<<3,
+       CULL_COMM = 1<<4,
+       CULL_STACKTRACE = 1<<5
 };
 struct filter_condition {
        pid_t tgid;
 static struct block_list *list;
 static int list_size;
 static int max_size;
-static int cull_st;
+static int cull;
 static int filter;
 
 int read_block(char *buf, int buf_size, FILE *fin)
        return l1->free_ts_nsec < l2->free_ts_nsec ? -1 : 1;
 }
 
+
+static int compare_release(const void *p1, const void *p2)
+{
+       const struct block_list *l1 = p1, *l2 = p2;
+
+       if (!l1->free_ts_nsec && !l2->free_ts_nsec)
+               return 0;
+       if (l1->free_ts_nsec && l2->free_ts_nsec)
+               return 0;
+       return l1->free_ts_nsec ? 1 : -1;
+}
+
+
+static int compare_cull_condition(const void *p1, const void *p2)
+{
+       if (cull == 0)
+               return compare_txt(p1, p2);
+       if ((cull & CULL_STACKTRACE) && compare_stacktrace(p1, p2))
+               return compare_stacktrace(p1, p2);
+       if ((cull & CULL_PID) && compare_pid(p1, p2))
+               return compare_pid(p1, p2);
+       if ((cull & CULL_TGID) && compare_tgid(p1, p2))
+               return compare_tgid(p1, p2);
+       if ((cull & CULL_COMM) && compare_comm(p1, p2))
+               return compare_comm(p1, p2);
+       if ((cull & CULL_UNRELEASE) && compare_release(p1, p2))
+               return compare_release(p1, p2);
+       return 0;
+}
+
 static int search_pattern(regex_t *pattern, char *pattern_str, char *buf)
 {
        int err, val_len;
        }
 }
 
+static char **explode(char sep, const char *str, int *size)
+{
+       int count = 0, len = strlen(str);
+       int lastindex = -1, j = 0;
+
+       for (int i = 0; i < len; i++)
+               if (str[i] == sep)
+                       count++;
+       char **ret = calloc(++count, sizeof(char *));
+
+       for (int i = 0; i < len; i++) {
+               if (str[i] == sep) {
+                       ret[j] = calloc(i - lastindex, sizeof(char));
+                       memcpy(ret[j++], str + lastindex + 1, i - lastindex - 1);
+                       lastindex = i;
+               }
+       }
+       if (lastindex <= len - 1) {
+               ret[j] = calloc(len - lastindex, sizeof(char));
+               memcpy(ret[j++], str + lastindex + 1, strlen(str) - 1 - lastindex);
+       }
+       *size = j;
+       return ret;
+}
+
+static void free_explode(char **arr, int size)
+{
+       for (int i = 0; i < size; i++)
+               free(arr[i]);
+       free(arr);
+}
+
 # define FIELD_BUFF 25
 
 static int get_page_num(char *buf)
 
 static bool is_need(char *buf)
 {
-               if ((filter & FILTER_UNRELEASE) != 0 && get_free_ts_nsec(buf) != 0)
+               if ((filter & FILTER_UNRELEASE) && get_free_ts_nsec(buf) != 0)
                        return false;
-               if ((filter & FILTER_PID) != 0 && get_pid(buf) != fc.pid)
+               if ((filter & FILTER_PID) && get_pid(buf) != fc.pid)
                        return false;
-               if ((filter & FILTER_TGID) != 0 && get_tgid(buf) != fc.tgid)
+               if ((filter & FILTER_TGID) && get_tgid(buf) != fc.tgid)
                        return false;
 
                char *comm = get_comm(buf);
 
-               if ((filter & FILTER_TASK_COMM_NAME) != 0  &&
+               if ((filter & FILTER_COMM) &&
                strncmp(comm, fc.comm, TASK_COMM_LEN) != 0) {
                        free(comm);
                        return false;
        }
 }
 
+static bool parse_cull_args(const char *arg_str)
+{
+       int size = 0;
+       char **args = explode(',', arg_str, &size);
+
+       for (int i = 0; i < size; ++i)
+               if (!strcmp(args[i], "pid") || !strcmp(args[i], "p"))
+                       cull |= CULL_PID;
+               else if (!strcmp(args[i], "tgid") || !strcmp(args[i], "tg"))
+                       cull |= CULL_TGID;
+               else if (!strcmp(args[i], "name") || !strcmp(args[i], "n"))
+                       cull |= CULL_COMM;
+               else if (!strcmp(args[i], "stacktrace") || !strcmp(args[i], "st"))
+                       cull |= CULL_STACKTRACE;
+               else if (!strcmp(args[i], "free") || !strcmp(args[i], "f"))
+                       cull |= CULL_UNRELEASE;
+               else {
+                       free_explode(args, size);
+                       return false;
+               }
+       free_explode(args, size);
+       return true;
+}
+
 #define BUF_SIZE       (128 * 1024)
 
 static void usage(void)
                "--pid <PID>\tSelect by pid. This selects the information of blocks whose process ID number equals to <PID>.\n"
                "--tgid <TGID>\tSelect by tgid. This selects the information of blocks whose Thread Group ID number equals to <TGID>.\n"
                "--name <command>\n\t\tSelect by command name. This selects the information of blocks whose command name identical to <command>.\n"
+               "--cull <rules>\tCull by user-defined rules. <rules> is a single argument in the form of a comma-separated list with some common fields predefined\n"
        );
 }
 
                { "pid", required_argument, NULL, 1 },
                { "tgid", required_argument, NULL, 2 },
                { "name", required_argument, NULL, 3 },
+               { "cull",  required_argument, NULL, 4 },
                { 0, 0, 0, 0},
        };
 
                        cmp = compare_ts;
                        break;
                case 'c':
-                       cull_st = 1;
+                       cull = cull | CULL_STACKTRACE;
                        break;
                case 'f':
                        filter = filter | FILTER_UNRELEASE;
                        }
                        break;
                case 3:
-                       filter = filter | FILTER_TASK_COMM_NAME;
+                       filter = filter | FILTER_COMM;
                        strncpy(fc.comm, optarg, TASK_COMM_LEN);
                        fc.comm[TASK_COMM_LEN-1] = '\0';
                        break;
+               case 4:
+                       if (!parse_cull_args(optarg)) {
+                               printf("wrong argument after --cull in from the command line:%s\n",
+                                               optarg);
+                               exit(1);
+                       }
+                       break;
                default:
                        usage();
                        exit(1);
 
        printf("sorting ....\n");
 
-       if (cull_st == 1)
-               qsort(list, list_size, sizeof(list[0]), compare_stacktrace);
-       else
-               qsort(list, list_size, sizeof(list[0]), compare_txt);
-
-
+       qsort(list, list_size, sizeof(list[0]), compare_cull_condition);
 
        printf("culling\n");
 
-       long offset = cull_st ? &list[0].stacktrace - &list[0].txt : 0;
-
        for (i = count = 0; i < list_size; i++) {
                if (count == 0 ||
-                   strcmp(*(&list[count-1].txt+offset), *(&list[i].txt+offset)) != 0) {
+                   compare_cull_condition((void *)(&list[count-1]), (void *)(&list[i])) != 0) {
                        list[count++] = list[i];
                } else {
                        list[count-1].num += list[i].num;
        qsort(list, count, sizeof(list[0]), cmp);
 
        for (i = 0; i < count; i++) {
-               if (cull_st == 0)
+               if (cull == 0)
                        fprintf(fout, "%d times, %d pages:\n%s\n",
                                        list[i].num, list[i].page_num, list[i].txt);
-               else
-                       fprintf(fout, "%d times, %d pages:\n%s\n",
-                                       list[i].num, list[i].page_num, list[i].stacktrace);
+               else {
+                       fprintf(fout, "%d times, %d pages",
+                                       list[i].num, list[i].page_num);
+                       if (cull & CULL_PID || filter & FILTER_PID)
+                               fprintf(fout, ", PID %d", list[i].pid);
+                       if (cull & CULL_TGID || filter & FILTER_TGID)
+                               fprintf(fout, ", TGID %d", list[i].pid);
+                       if (cull & CULL_COMM || filter & FILTER_COMM)
+                               fprintf(fout, ", task_comm_name: %s", list[i].comm);
+                       if (cull & CULL_UNRELEASE)
+                               fprintf(fout, " (%s)",
+                                               list[i].free_ts_nsec ? "UNRELEASED" : "RELEASED");
+                       if (cull & CULL_STACKTRACE)
+                               fprintf(fout, ":\n%s", list[i].stacktrace);
+                       fprintf(fout, "\n");
+               }
        }
        regfree(&order_pattern);
        regfree(&pid_pattern);