晋太元中,武陵人捕鱼为业。缘溪行,忘路之远近。忽逢桃花林,夹岸数百步,中无杂树,芳草鲜美,落英缤纷。渔人甚异之,复前行,欲穷其林。 林尽水源,便得一山,山有小口,仿佛若有光。便舍船,从口入。初极狭,才通人。复行数十步,豁然开朗。土地平旷,屋舍俨然,有良田、美池、桑竹之属。阡陌交通,鸡犬相闻。其中往来种作,男女衣着,悉如外人。黄发垂髫,并怡然自乐。 见渔人,乃大惊,问所从来。具答之。便要还家,设酒杀鸡作食。村中闻有此人,咸来问讯。自云先世避秦时乱,率妻子邑人来此绝境,不复出焉,遂与外人间隔。问今是何世,乃不知有汉,无论魏晋。此人一一为具言所闻,皆叹惋。余人各复延至其家,皆出酒食。停数日,辞去。此中人语云:“不足为外人道也。”(间隔 一作:隔绝) 既出,得其船,便扶向路,处处志之。及郡下,诣太守,说如此。太守即遣人随其往,寻向所志,遂迷,不复得路。 南阳刘子骥,高尚士也,闻之,欣然规往。未果,寻病终。后遂无问津者。
|
Server : Apache System : Linux srv.rainic.com 4.18.0-553.47.1.el8_10.x86_64 #1 SMP Wed Apr 2 05:45:37 EDT 2025 x86_64 User : rainic ( 1014) PHP Version : 7.4.33 Disable Function : exec,passthru,shell_exec,system Directory : /usr/include/bind9/isccc/ |
Upload File : |
/*
* Portions Copyright (C) Internet Systems Consortium, Inc. ("ISC")
*
* This Source Code Form is subject to the terms of the Mozilla Public
* License, v. 2.0. If a copy of the MPL was not distributed with this
* file, you can obtain one at https://mozilla.org/MPL/2.0/.
*
* See the COPYRIGHT file distributed with this work for additional
* information regarding copyright ownership.
*
* Portions Copyright (C) 2001 Nominum, Inc.
*
* Permission to use, copy, modify, and/or distribute this software for any
* purpose with or without fee is hereby granted, provided that the above
* copyright notice and this permission notice appear in all copies.
*
* THE SOFTWARE IS PROVIDED "AS IS" AND ISC AND NOMINUM DISCLAIMS ALL
* WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES
* OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR ANY
* SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
*/
#ifndef ISCCC_SEXPR_H
#define ISCCC_SEXPR_H 1
/*! \file isccc/sexpr.h */
#include <stdbool.h>
#include <stdio.h>
#include <isc/lang.h>
#include <isccc/types.h>
ISC_LANG_BEGINDECLS
/*% dotted pair structure */
struct isccc_dottedpair {
isccc_sexpr_t *car;
isccc_sexpr_t *cdr;
};
/*% iscc_sexpr structure */
struct isccc_sexpr {
unsigned int type;
union {
char * as_string;
isccc_dottedpair_t as_dottedpair;
isccc_region_t as_region;
} value;
};
#define ISCCC_SEXPRTYPE_NONE 0x00 /*%< Illegal. */
#define ISCCC_SEXPRTYPE_T 0x01
#define ISCCC_SEXPRTYPE_STRING 0x02
#define ISCCC_SEXPRTYPE_DOTTEDPAIR 0x03
#define ISCCC_SEXPRTYPE_BINARY 0x04
#define ISCCC_SEXPR_CAR(s) (s)->value.as_dottedpair.car
#define ISCCC_SEXPR_CDR(s) (s)->value.as_dottedpair.cdr
isccc_sexpr_t *
isccc_sexpr_cons(isccc_sexpr_t *car, isccc_sexpr_t *cdr);
isccc_sexpr_t *
isccc_sexpr_tconst(void);
isccc_sexpr_t *
isccc_sexpr_fromstring(const char *str);
isccc_sexpr_t *
isccc_sexpr_frombinary(const isccc_region_t *region);
void
isccc_sexpr_free(isccc_sexpr_t **sexprp);
void
isccc_sexpr_print(isccc_sexpr_t *sexpr, FILE *stream);
isccc_sexpr_t *
isccc_sexpr_car(isccc_sexpr_t *list);
isccc_sexpr_t *
isccc_sexpr_cdr(isccc_sexpr_t *list);
void
isccc_sexpr_setcar(isccc_sexpr_t *pair, isccc_sexpr_t *car);
void
isccc_sexpr_setcdr(isccc_sexpr_t *pair, isccc_sexpr_t *cdr);
isccc_sexpr_t *
isccc_sexpr_addtolist(isccc_sexpr_t **l1p, isccc_sexpr_t *l2);
bool
isccc_sexpr_listp(isccc_sexpr_t *sexpr);
bool
isccc_sexpr_emptyp(isccc_sexpr_t *sexpr);
bool
isccc_sexpr_stringp(isccc_sexpr_t *sexpr);
bool
isccc_sexpr_binaryp(isccc_sexpr_t *sexpr);
char *
isccc_sexpr_tostring(isccc_sexpr_t *sexpr);
isccc_region_t *
isccc_sexpr_tobinary(isccc_sexpr_t *sexpr);
ISC_LANG_ENDDECLS
#endif /* ISCCC_SEXPR_H */