漫话Redis源码之一百零五

2024-02-06 09:32
文章标签 源码 redis 漫话 一百零五

本文主要是介绍漫话Redis源码之一百零五，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！

fsl相关的代码，都是一些基本的操作：

void fsl_rdb_save(RedisModuleIO *rdb, void *value) {fsl_t *fsl = value;RedisModule_SaveUnsigned(rdb,fsl->length);for (long long i = 0; i < fsl->length; i++)RedisModule_SaveSigned(rdb, fsl->list[i]);
}void fsl_aofrw(RedisModuleIO *aof, RedisModuleString *key, void *value) {fsl_t *fsl = value;for (long long i = 0; i < fsl->length; i++)RedisModule_EmitAOF(aof, "FSL.PUSH","sl", key, fsl->list[i]);
}void fsl_free(void *value) {fsl_type_free(value);
}/* ========================== helper methods ======================= */int get_fsl(RedisModuleCtx *ctx, RedisModuleString *keyname, int mode, int create, fsl_t **fsl, int reply_on_failure) {RedisModuleKey *key = RedisModule_OpenKey(ctx, keyname, mode);int type = RedisModule_KeyType(key);if (type != REDISMODULE_KEYTYPE_EMPTY && RedisModule_ModuleTypeGetType(key) != fsltype) {RedisModule_CloseKey(key);if (reply_on_failure)RedisModule_ReplyWithError(ctx, REDISMODULE_ERRORMSG_WRONGTYPE);RedisModuleCallReply *reply = RedisModule_Call(ctx, "INCR", "c", "fsl_wrong_type");RedisModule_FreeCallReply(reply);return 0;}/* Create an empty value object if the key is currently empty. */if (type == REDISMODULE_KEYTYPE_EMPTY) {if (!create) {/* Key is empty but we cannot create */RedisModule_CloseKey(key);*fsl = NULL;return 1;}*fsl = fsl_type_create();RedisModule_ModuleTypeSetValue(key, fsltype, *fsl);} else {*fsl = RedisModule_ModuleTypeGetValue(key);}RedisModule_CloseKey(key);return 1;
}/* ========================== commands ======================= *//* FSL.PUSH <key> <int> - Push an integer to the fixed-size list (to the right).* It must be greater than the element in the head of the list. */
int fsl_push(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {if (argc != 3)return RedisModule_WrongArity(ctx);long long ele;if (RedisModule_StringToLongLong(argv[2],&ele) != REDISMODULE_OK)return RedisModule_ReplyWithError(ctx,"ERR invalid integer");fsl_t *fsl;if (!get_fsl(ctx, argv[1], REDISMODULE_WRITE, 1, &fsl, 1))return REDISMODULE_OK;if (fsl->length == LIST_SIZE)return RedisModule_ReplyWithError(ctx,"ERR list is full");if (fsl->length != 0 && fsl->list[fsl->length-1] >= ele)return RedisModule_ReplyWithError(ctx,"ERR new element has to be greater than the head element");fsl->list[fsl->length++] = ele;RedisModule_SignalKeyAsReady(ctx, argv[1]);return RedisModule_ReplyWithSimpleString(ctx, "OK");
}int bpop_reply_callback(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {REDISMODULE_NOT_USED(argv);REDISMODULE_NOT_USED(argc);RedisModuleString *keyname = RedisModule_GetBlockedClientReadyKey(ctx);fsl_t *fsl;if (!get_fsl(ctx, keyname, REDISMODULE_READ, 0, &fsl, 0) || !fsl)return REDISMODULE_ERR;RedisModule_ReplyWithLongLong(ctx, fsl->list[--fsl->length]);return REDISMODULE_OK;
}int bpop_timeout_callback(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {REDISMODULE_NOT_USED(argv);REDISMODULE_NOT_USED(argc);return RedisModule_ReplyWithSimpleString(ctx, "Request timedout");
}/* FSL.BPOP <key> <timeout> - Block clients until list has two or more elements.* When that happens, unblock client and pop the last two elements (from the right). */
int fsl_bpop(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {if (argc != 3)return RedisModule_WrongArity(ctx);long long timeout;if (RedisModule_StringToLongLong(argv[2],&timeout) != REDISMODULE_OK || timeout < 0)return RedisModule_ReplyWithError(ctx,"ERR invalid timeout");fsl_t *fsl;if (!get_fsl(ctx, argv[1], REDISMODULE_READ, 0, &fsl, 1))return REDISMODULE_OK;if (!fsl) {RedisModule_BlockClientOnKeys(ctx, bpop_reply_callback, bpop_timeout_callback,NULL, timeout, &argv[1], 1, NULL);} else {RedisModule_ReplyWithLongLong(ctx, fsl->list[--fsl->length]);}return REDISMODULE_OK;
}int bpopgt_reply_callback(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {REDISMODULE_NOT_USED(argv);REDISMODULE_NOT_USED(argc);RedisModuleString *keyname = RedisModule_GetBlockedClientReadyKey(ctx);long long *pgt = RedisModule_GetBlockedClientPrivateData(ctx);fsl_t *fsl;if (!get_fsl(ctx, keyname, REDISMODULE_READ, 0, &fsl, 0) || !fsl)return REDISMODULE_ERR;if (fsl->list[fsl->length-1] <= *pgt)return REDISMODULE_ERR;RedisModule_ReplyWithLongLong(ctx, fsl->list[--fsl->length]);return REDISMODULE_OK;
}int bpopgt_timeout_callback(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {REDISMODULE_NOT_USED(argv);REDISMODULE_NOT_USED(argc);return RedisModule_ReplyWithSimpleString(ctx, "Request timedout");
}void bpopgt_free_privdata(RedisModuleCtx *ctx, void *privdata) {REDISMODULE_NOT_USED(ctx);RedisModule_Free(privdata);
}/* FSL.BPOPGT <key> <gt> <timeout> - Block clients until list has an element greater than <gt>.* When that happens, unblock client and pop the last element (from the right). */
int fsl_bpopgt(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {if (argc != 4)return RedisModule_WrongArity(ctx);long long gt;if (RedisModule_StringToLongLong(argv[2],&gt) != REDISMODULE_OK)return RedisModule_ReplyWithError(ctx,"ERR invalid integer");long long timeout;if (RedisModule_StringToLongLong(argv[3],&timeout) != REDISMODULE_OK || timeout < 0)return RedisModule_ReplyWithError(ctx,"ERR invalid timeout");fsl_t *fsl;if (!get_fsl(ctx, argv[1], REDISMODULE_READ, 0, &fsl, 1))return REDISMODULE_OK;if (!fsl || fsl->list[fsl->length-1] <= gt) {/* We use malloc so the tests in blockedonkeys.tcl can check for memory leaks */long long *pgt = RedisModule_Alloc(sizeof(long long));*pgt = gt;RedisModule_BlockClientOnKeys(ctx, bpopgt_reply_callback, bpopgt_timeout_callback,bpopgt_free_privdata, timeout, &argv[1], 1, pgt);} else {RedisModule_ReplyWithLongLong(ctx, fsl->list[--fsl->length]);}return REDISMODULE_OK;
}int bpoppush_reply_callback(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {REDISMODULE_NOT_USED(argv);REDISMODULE_NOT_USED(argc);RedisModuleString *src_keyname = RedisModule_GetBlockedClientReadyKey(ctx);RedisModuleString *dst_keyname = RedisModule_GetBlockedClientPrivateData(ctx);fsl_t *src;if (!get_fsl(ctx, src_keyname, REDISMODULE_READ, 0, &src, 0) || !src)return REDISMODULE_ERR;fsl_t *dst;if (!get_fsl(ctx, dst_keyname, REDISMODULE_WRITE, 1, &dst, 0) || !dst)return REDISMODULE_ERR;long long ele = src->list[--src->length];dst->list[dst->length++] = ele;RedisModule_SignalKeyAsReady(ctx, dst_keyname);return RedisModule_ReplyWithLongLong(ctx, ele);
}int bpoppush_timeout_callback(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {REDISMODULE_NOT_USED(argv);REDISMODULE_NOT_USED(argc);return RedisModule_ReplyWithSimpleString(ctx, "Request timedout");
}void bpoppush_free_privdata(RedisModuleCtx *ctx, void *privdata) {RedisModule_FreeString(ctx, privdata);
}/* FSL.BPOPPUSH <src> <dst> <timeout> - Block clients until <src> has an element.* When that happens, unblock client, pop the last element from <src> and push it to <dst>* (from the right). */
int fsl_bpoppush(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {if (argc != 4)return RedisModule_WrongArity(ctx);long long timeout;if (RedisModule_StringToLongLong(argv[3],&timeout) != REDISMODULE_OK || timeout < 0)return RedisModule_ReplyWithError(ctx,"ERR invalid timeout");fsl_t *src;if (!get_fsl(ctx, argv[1], REDISMODULE_READ, 0, &src, 1))return REDISMODULE_OK;if (!src) {/* Retain string for reply callback */RedisModule_RetainString(ctx, argv[2]);/* Key is empty, we must block */RedisModule_BlockClientOnKeys(ctx, bpoppush_reply_callback, bpoppush_timeout_callback,bpoppush_free_privdata, timeout, &argv[1], 1, argv[2]);} else {fsl_t *dst;if (!get_fsl(ctx, argv[2], REDISMODULE_WRITE, 1, &dst, 1))return REDISMODULE_OK;long long ele = src->list[--src->length];dst->list[dst->length++] = ele;RedisModule_SignalKeyAsReady(ctx, argv[2]);RedisModule_ReplyWithLongLong(ctx, ele);}return REDISMODULE_OK;
}/* FSL.GETALL <key> - Reply with an array containing all elements. */
int fsl_getall(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {if (argc != 2)return RedisModule_WrongArity(ctx);fsl_t *fsl;if (!get_fsl(ctx, argv[1], REDISMODULE_READ, 0, &fsl, 1))return REDISMODULE_OK;if (!fsl)return RedisModule_ReplyWithArray(ctx, 0);RedisModule_ReplyWithArray(ctx, fsl->length);for (int i = 0; i < fsl->length; i++)RedisModule_ReplyWithLongLong(ctx, fsl->list[i]);return REDISMODULE_OK;
}/* Callback for blockonkeys_popall */
int blockonkeys_popall_reply_callback(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {REDISMODULE_NOT_USED(argc);RedisModuleKey *key = RedisModule_OpenKey(ctx, argv[1], REDISMODULE_WRITE);if (RedisModule_KeyType(key) == REDISMODULE_KEYTYPE_LIST) {RedisModuleString *elem;long len = 0;RedisModule_ReplyWithArray(ctx, REDISMODULE_POSTPONED_ARRAY_LEN);while ((elem = RedisModule_ListPop(key, REDISMODULE_LIST_HEAD)) != NULL) {len++;RedisModule_ReplyWithString(ctx, elem);RedisModule_FreeString(ctx, elem);}RedisModule_ReplySetArrayLength(ctx, len);} else {RedisModule_ReplyWithError(ctx, "ERR Not a list");}RedisModule_CloseKey(key);return REDISMODULE_OK;
}int blockonkeys_popall_timeout_callback(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {REDISMODULE_NOT_USED(argv);REDISMODULE_NOT_USED(argc);return RedisModule_ReplyWithError(ctx, "ERR Timeout");
}/* BLOCKONKEYS.POPALL key** Blocks on an empty key for up to 3 seconds. When unblocked by a list* operation like LPUSH, all the elements are popped and returned. Fails with an* error on timeout. */
int blockonkeys_popall(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {if (argc != 2)return RedisModule_WrongArity(ctx);RedisModuleKey *key = RedisModule_OpenKey(ctx, argv[1], REDISMODULE_READ);if (RedisModule_KeyType(key) == REDISMODULE_KEYTYPE_EMPTY) {RedisModule_BlockClientOnKeys(ctx, blockonkeys_popall_reply_callback,blockonkeys_popall_timeout_callback,NULL, 3000, &argv[1], 1, NULL);} else {RedisModule_ReplyWithError(ctx, "ERR Key not empty");}RedisModule_CloseKey(key);return REDISMODULE_OK;
}/* BLOCKONKEYS.LPUSH key val [val ..]* BLOCKONKEYS.LPUSH_UNBLOCK key val [val ..]** A module equivalent of LPUSH. If the name LPUSH_UNBLOCK is used,* RM_SignalKeyAsReady() is also called. */
int blockonkeys_lpush(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {if (argc < 3)return RedisModule_WrongArity(ctx);RedisModuleKey *key = RedisModule_OpenKey(ctx, argv[1], REDISMODULE_WRITE);if (RedisModule_KeyType(key) != REDISMODULE_KEYTYPE_EMPTY &&RedisModule_KeyType(key) != REDISMODULE_KEYTYPE_LIST) {RedisModule_ReplyWithError(ctx, REDISMODULE_ERRORMSG_WRONGTYPE);} else {for (int i = 2; i < argc; i++) {if (RedisModule_ListPush(key, REDISMODULE_LIST_HEAD,argv[i]) != REDISMODULE_OK) {RedisModule_CloseKey(key);return RedisModule_ReplyWithError(ctx, "ERR Push failed");}}}RedisModule_CloseKey(key);/* signal key as ready if the command is lpush_unblock */size_t len;const char *str = RedisModule_StringPtrLen(argv[0], &len);if (!strncasecmp(str, "blockonkeys.lpush_unblock", len)) {RedisModule_SignalKeyAsReady(ctx, argv[1]);}return RedisModule_ReplyWithSimpleString(ctx, "OK");
}/* Callback for the BLOCKONKEYS.BLPOPN command */
int blockonkeys_blpopn_reply_callback(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {REDISMODULE_NOT_USED(argc);long long n;RedisModule_StringToLongLong(argv[2], &n);RedisModuleKey *key = RedisModule_OpenKey(ctx, argv[1], REDISMODULE_WRITE);int result;if (RedisModule_KeyType(key) == REDISMODULE_KEYTYPE_LIST &&RedisModule_ValueLength(key) >= (size_t)n) {RedisModule_ReplyWithArray(ctx, n);for (long i = 0; i < n; i++) {RedisModuleString *elem = RedisModule_ListPop(key, REDISMODULE_LIST_HEAD);RedisModule_ReplyWithString(ctx, elem);RedisModule_FreeString(ctx, elem);}result = REDISMODULE_OK;} else if (RedisModule_KeyType(key) == REDISMODULE_KEYTYPE_LIST ||RedisModule_KeyType(key) == REDISMODULE_KEYTYPE_EMPTY) {/* continue blocking */result = REDISMODULE_ERR;} else {result = RedisModule_ReplyWithError(ctx, REDISMODULE_ERRORMSG_WRONGTYPE);}RedisModule_CloseKey(key);return result;
}int blockonkeys_blpopn_timeout_callback(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {REDISMODULE_NOT_USED(argv);REDISMODULE_NOT_USED(argc);return RedisModule_ReplyWithError(ctx, "ERR Timeout");
}/* BLOCKONKEYS.BLPOPN key N** Blocks until key has N elements and then pops them or fails after 3 seconds.*/
int blockonkeys_blpopn(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {if (argc < 3) return RedisModule_WrongArity(ctx);long long n;if (RedisModule_StringToLongLong(argv[2], &n) != REDISMODULE_OK) {return RedisModule_ReplyWithError(ctx, "ERR Invalid N");}RedisModuleKey *key = RedisModule_OpenKey(ctx, argv[1], REDISMODULE_WRITE);int keytype = RedisModule_KeyType(key);if (keytype != REDISMODULE_KEYTYPE_EMPTY &&keytype != REDISMODULE_KEYTYPE_LIST) {RedisModule_ReplyWithError(ctx, REDISMODULE_ERRORMSG_WRONGTYPE);} else if (keytype == REDISMODULE_KEYTYPE_LIST &&RedisModule_ValueLength(key) >= (size_t)n) {RedisModule_ReplyWithArray(ctx, n);for (long i = 0; i < n; i++) {RedisModuleString *elem = RedisModule_ListPop(key, REDISMODULE_LIST_HEAD);RedisModule_ReplyWithString(ctx, elem);RedisModule_FreeString(ctx, elem);}} else {RedisModule_BlockClientOnKeys(ctx, blockonkeys_blpopn_reply_callback,blockonkeys_blpopn_timeout_callback,NULL, 3000, &argv[1], 1, NULL);}RedisModule_CloseKey(key);return REDISMODULE_OK;
}int RedisModule_OnLoad(RedisModuleCtx *ctx, RedisModuleString **argv, int argc) {REDISMODULE_NOT_USED(argv);REDISMODULE_NOT_USED(argc);if (RedisModule_Init(ctx, "blockonkeys", 1, REDISMODULE_APIVER_1)== REDISMODULE_ERR)return REDISMODULE_ERR;RedisModuleTypeMethods tm = {.version = REDISMODULE_TYPE_METHOD_VERSION,.rdb_load = fsl_rdb_load,.rdb_save = fsl_rdb_save,.aof_rewrite = fsl_aofrw,.mem_usage = NULL,.free = fsl_free,.digest = NULL};fsltype = RedisModule_CreateDataType(ctx, "fsltype_t", 0, &tm);if (fsltype == NULL)return REDISMODULE_ERR;if (RedisModule_CreateCommand(ctx,"fsl.push",fsl_push,"",0,0,0) == REDISMODULE_ERR)return REDISMODULE_ERR;if (RedisModule_CreateCommand(ctx,"fsl.bpop",fsl_bpop,"",0,0,0) == REDISMODULE_ERR)return REDISMODULE_ERR;if (RedisModule_CreateCommand(ctx,"fsl.bpopgt",fsl_bpopgt,"",0,0,0) == REDISMODULE_ERR)return REDISMODULE_ERR;if (RedisModule_CreateCommand(ctx,"fsl.bpoppush",fsl_bpoppush,"",0,0,0) == REDISMODULE_ERR)return REDISMODULE_ERR;if (RedisModule_CreateCommand(ctx,"fsl.getall",fsl_getall,"",0,0,0) == REDISMODULE_ERR)return REDISMODULE_ERR;if (RedisModule_CreateCommand(ctx, "blockonkeys.popall", blockonkeys_popall,"", 1, 1, 1) == REDISMODULE_ERR)return REDISMODULE_ERR;if (RedisModule_CreateCommand(ctx, "blockonkeys.lpush", blockonkeys_lpush,"", 1, 1, 1) == REDISMODULE_ERR)return REDISMODULE_ERR;if (RedisModule_CreateCommand(ctx, "blockonkeys.lpush_unblock", blockonkeys_lpush,"", 1, 1, 1) == REDISMODULE_ERR)return REDISMODULE_ERR;if (RedisModule_CreateCommand(ctx, "blockonkeys.blpopn", blockonkeys_blpopn,"", 1, 1, 1) == REDISMODULE_ERR)return REDISMODULE_ERR;return REDISMODULE_OK;
}

这篇关于漫话Redis源码之一百零五的文章就介绍到这儿，希望我们推荐的文章对编程师们有所帮助！


http://www.chinasem.cn/article/683859。

相关文章

Redis 基本数据类型和使用详解

Redis 基本数据类型和使用详解

《Redis基本数据类型和使用详解》String是Redis最基本的数据类型,一个键对应一个值,它的功能十分强大,可以存储字符串、整数、浮点数等多种数据格式,本文给大家介绍Redis基本数据类型和... 目录一、Redis 入门介绍二、Redis 的五大基本数据类型2.1 String 类型2.2 Hash
阅读更多...
Redis中Hash从使用过程到原理说明

Redis中Hash从使用过程到原理说明

《Redis中Hash从使用过程到原理说明》RedisHash结构用于存储字段-值对,适合对象数据,支持HSET、HGET等命令,采用ziplist或hashtable编码,通过渐进式rehash优化... 目录一、开篇：Hash就像超市的货架二、Hash的基本使用1. 常用命令示例2. Java操作示例三
阅读更多...
Redis中Set结构使用过程与原理说明

Redis中Set结构使用过程与原理说明

《Redis中Set结构使用过程与原理说明》本文解析了RedisSet数据结构,涵盖其基本操作（如添加、查找）、集合运算（交并差）、底层实现（intset与hashtable自动切换机制）、典型应用场... 目录开篇：从购物车到Redis Set一、Redis Set的基本操作1.1 编程常用命令1.2 集
阅读更多...
Redis中的有序集合zset从使用到原理分析

Redis中的有序集合zset从使用到原理分析

《Redis中的有序集合zset从使用到原理分析》Redis有序集合(zset)是字符串与分值的有序映射,通过跳跃表和哈希表结合实现高效有序性管理,适用于排行榜、延迟队列等场景,其时间复杂度低,内存占... 目录开篇：排行榜背后的秘密一、zset的基本使用1.1 常用命令1.2 Java客户端示例二、zse
阅读更多...
Redis中的AOF原理及分析

Redis中的AOF原理及分析

《Redis中的AOF原理及分析》Redis的AOF通过记录所有写操作命令实现持久化,支持always/everysec/no三种同步策略,重写机制优化文件体积,与RDB结合可平衡数据安全与恢复效率... 目录开篇：从日记本到AOF一、AOF的基本执行流程1. 命令执行与记录2. AOF重写机制二、AOF的
阅读更多...
Redis高性能Key-Value存储与缓存利器常见解决方案

Redis高性能Key-Value存储与缓存利器常见解决方案

《Redis高性能Key-Value存储与缓存利器常见解决方案》Redis是高性能内存Key-Value存储系统,支持丰富数据类型与持久化方案（RDB/AOF）,本文给大家介绍Redis高性能Key-... 目录Redis：高性能Key-Value存储与缓存利器什么是Redis？为什么选择Redis？Red
阅读更多...
java 恺撒加密/解密实现原理(附带源码)

java 恺撒加密/解密实现原理(附带源码)

《java恺撒加密/解密实现原理(附带源码)》本文介绍Java实现恺撒加密与解密,通过固定位移量对字母进行循环替换,保留大小写及非字母字符,由于其实现简单、易于理解,恺撒加密常被用作学习加密算法的入... 目录Java 恺撒加密/解密实现1. 项目背景与介绍2. 相关知识2.1 恺撒加密算法原理2.2 Ja
阅读更多...
Nginx屏蔽服务器名称与版本信息方式(源码级修改)

Nginx屏蔽服务器名称与版本信息方式(源码级修改)

《Nginx屏蔽服务器名称与版本信息方式(源码级修改)》本文详解如何通过源码修改Nginx1.25.4,移除Server响应头中的服务类型和版本信息,以增强安全性,需重新配置、编译、安装,升级时需重复... 目录一、背景与目的二、适用版本三、操作步骤修改源码文件四、后续操作提示五、注意事项六、总结一、背景与
阅读更多...
Android实现图片浏览功能的示例详解(附带源码)

Android实现图片浏览功能的示例详解(附带源码)

《Android实现图片浏览功能的示例详解(附带源码)》在许多应用中,都需要展示图片并支持用户进行浏览,本文主要为大家介绍了如何通过Android实现图片浏览功能,感兴趣的小伙伴可以跟随小编一起学习一... 目录一、项目背景详细介绍二、项目需求详细介绍三、相关技术详细介绍四、实现思路详细介绍五、完整实现代码
阅读更多...
Redis 的 SUBSCRIBE命令详解

Redis 的 SUBSCRIBE命令详解

《Redis的SUBSCRIBE命令详解》Redis的SUBSCRIBE命令用于订阅一个或多个频道,以便接收发送到这些频道的消息,本文给大家介绍Redis的SUBSCRIBE命令,感兴趣的朋友跟随... 目录基本语法工作原理示例消息格式相关命令python 示例Redis 的 SUBSCRIBE 命令用于订
阅读更多...

Copyright China编程 23002807@qq.com

沪ICP备2023033072号-2